Select Code to Download

my $all_lines = '';

...
chop $all_lines; # remove trailing ":"

my %values = split /:/, $all_lines;