Select Code to Download

(@entry[0..8]) = split(/:/,$_);
$newentry = join(":", @entry[0..8]);

@entry = split /:/; # Automagically uses $_.
$newentry = join (":", @entry[0..8]);