Help for this page

Select Code to Download

Select or download this

$  perl -e 'my $s = "xyabcy*+!*+!*+!*+!*+!*+!"; $s =~ y/*+!//d; print 
+$s, $/;'
xyabcy
$  perl -e 'my $s = "*+!xyabcy*+!*+!*+!*+!*+!*+!"; $s =~ y/*+!//d; pri
+nt $s, $/;'
xyabcy
$