Anonymous user
Text processing/1: Difference between revisions
→{{header|Perl}}: Fixed indentation
(→{{header|Perl}}: Changes thanks to Botje from #perl on Freenode.) |
(→{{header|Perl}}: Fixed indentation) |
||
Line 1,301:
# extract field info, skipping initial date field
my ($date, @fields) = split;
if(($flag+1<2)){
$nodata++;
|