in reply to Re^2: output the read result into a log file
in thread output the read result into a log file
does not matchif (m/^(.*) UTC.*refs = (\d+)$/) { ^^^^
2007-Jan-07 00:00:01 UTC (GMT +0000) - Poll: channel = two, ref = com, + id = 133714761
That seems to mach, and will tell you about it. Now, if that does not go to your file, it will have to do with later steps.# slightly altered--v if (m/^(.*) UTC.*ref .*? = (\d+)$/) { my $t = $1; $refs = $2; $dt = $Strp->parse_datetime($t); $timestamp = $dt->epoch(); warn "found: $. $timestamp\t$refs\n"; }
|
|---|