in reply to Small replace regular exp help...pls

my $str = "Some text1 : Data Some Text2"; $str =~ s/^Some text1 : //; print $str;

Prints:

Data Some Text2

DWIM is Perl's answer to Gödel