ここで、perlで次の構文について詳しく知ることができますか?<DATA>の構文perl
<DATA>
と__DATA__
の間の接続は不明です。
while (my $date_string = <DATA>) {
chomp($date_string);
next if not length $date_string;
print "$date_string ist Unixtime ",
$lang_date->str2time($date_string),
" und ",
$lang_date->time2str('%d.%m.%Y %T (%Z)',$lang_date->str2time($date_string)),
"\n";
}
__DATA__
1.3.1999
1 Marz 1999
1. Marz 1999
1/3/1999
「__DATA__」ハンドルで楽しくなる:http://stackoverflow.com/questions/4459601/how-can-i-use-data-twice、http://stackoverflow.com/a/10353338/168657 – mob