in reply to Chopping the beginning of a string?
my $str = 'abcdef'; $str = $1 if $str =~ m/^.(.*)$/; [download]
use perl;