in reply to Simple Parsing Script

chomp 
{
$time = $line1;
chomp $time;
}

[download]

In Section Seekers of Perl Wisdom