Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -wT
    use strict;
    ...
    
    __END__
    keyword1=word&keyword2=word&keyword3=word
    
  2. or download this
    my $i = '';
    (my $string = $input) =~ s/(^|\+)/($i++&&'&')."keyword$i="/ge;