Help for this page
my $str = "the boy walked the dog"; for ( $str ) { ... s/boy/girl/; s/dog/Audrey II/; }
my $str = "the boy walked the dog"; my %subs = ( "walked", "fed", "boy", "girl", "dog", "Audrey II" ); foreach ( keys %subs ) { $str =~ s/$_/$subs{$_}/; }
www.com | www.net | www.org
No recent polls found