「住所から緯度経度を取得する」の版間の差分
ナビゲーションに移動
検索に移動
imported>Webmaster |
imported>Webmaster |
||
1行目: | 1行目: | ||
− | <syntaxhighlight> | + | <syntaxhighlight lang="perl"> |
my $file_name = $ARGV[0]; | my $file_name = $ARGV[0]; | ||
− | chomp($file_name); | + | chomp($file_name);//あああああ |
$lines = 0; | $lines = 0; |
2015年12月29日 (火) 09:14時点における版
my $file_name = $ARGV[0];
chomp($file_name);//あああああ
$lines = 0;
open(FILE, $file_name) or die "Can't open `$filename': $!";
while (sysread FILE, $buffer, 4096) {
$lines += ($buffer =~ tr/\n//);
}
close FILE;
print $lines;