sub getvalue {
    my $line = shift; # get the argument
    my $start = index($line, ':');
    return substr($line, $start+2, length($line));
}