Help for this page

Select Code to Download


  1. or download this
    ($fn,$ln) = split(/\s+/,$input);
  2. or download this
    $input = "foo bar blurf";
($f,$s) = split /\s+/, $input;
print "<$f> <$s>\n"
__END__
<foo> <bar>
  3. or download this
    $input = "foo bar blurf";
($f,$s) = split /\s+/, $input, 2;
print "<$f> <$s>\n"
__END__
<foo> <bar quux>