Help for this page

Select Code to Download

Select or download this

my $string = '01:01:2000,14:01:12,1.584167';
my $min = substr($string, 14, 2);
print $min;

Select or download this

my $string = '01:01:2000,14:01:12,1.584167';
my $min = (split /:/, (split /,/, $string)[1])[1];
print $min;