my $line="'0x160001a \"fubar - BlahBlahBlah - Blah Blah (1:23)\": ("Foo" "Bar")  Baz";
if ($line=/\)/){
$line="$`)";
}
if ($line=/-\s/){
$line=$';
}