2006-01-08から1日間の記事一覧
my $url = q(http://www.google.com/search?num=100&hs=Dw4&hl=ja&client=opera&rls=ja&q=perl&btnG=Google+%E6%A4%9C%E7%B4%A2&lr=); $p = index($url, "?"); print ($p < 0) ? $url : substr($url, 0, $p);さて、これはなんて表示されるでしょうか? 答え…
my $url = q(http://www.google.com/search?num=100&hs=Dw4&hl=ja&client=opera&rls=ja&q=perl&btnG=Google+%E6%A4%9C%E7%B4%A2&lr=); $p = index($url, "?"); print ($p < 0) ? $url : substr($url, 0, $p);さて、これはなんて表示されるでしょうか? 答え…