在哪里可以找到有关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
解决方法
报价
the doc：
The
__DATA__token tells the perl compiler that the perl code for@H_301_14@ compilation is finished.Everything after the
__DATA__token is@H_301_14@ available for reading via the filehandleFOOBAR::DATA,whereFOOBARis@H_301_14@ the name of the current package when the__DATA__token is reached.This works just the same as
__END__does in package ‘main’,but for@H_301_14@ other modules data after__END__is not automatically retrievable,@H_301_14@ whereas data after__DATA__is.
可以添加到这一点,只有使用__DATA__部分是非常方便的来说明Perl中的一些文件阅读相关概念.它基本上是附加到代码的文件,并且可以通过< DATA>容易地访问该文件的内容.这就是为什么它在这里很受欢迎. )