( $a, $b, $c ) = split /:/, $str;