in reply to time string parsing question

Assuming you really wanted the minutes from $time and not from $string, 
my ($time, $minute) = $string =~ /,(\d+:(\d+):\d+)/;

[download]
Caution: Contents may have been coded under pressure.

In Section Seekers of Perl Wisdom