Help for this page

Select Code to Download


  1. or download this
    $name=~s/(\w+)(\s+)(\w+)/$1/ig;
print "$name\n";
  2. or download this
    Sam+ +Adams
Sam
Bud+ +weiser
Bud
Ice+ +House
Ice