Help for this page

Select Code to Download

Select or download this

my ($name, $val) = split /:\s*/;
my @val = split /:/, $val;