Help for this page

Select Code to Download


  1. or download this
         my ($one, $two) = grep { $_ } split (/exp/, $line);
  2. or download this
         my ($one, $two) = split (/exp/, $line, 2);