Perlについての質問箱 39箱目 at TECH
[2ch|▼Menu]
169:デフォルトの名無しさん
09/02/28 23:37:29
>>168
#!/usr/bin/perl
foreach my $fn (@ARGV){
open my $fp, "<", $fn;
print scalar(<$fp>);
}


次ページ
続きを表示
1を表示
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
暇つぶし2ch
5382日前に更新/164 KB
担当:undef