Help for this page

Select Code to Download


  1. or download this
    my @apps = split ' ', $form{'AppName'};
    
  2. or download this
    $ perl -le'print 0+( @a =            qw( a b c ) )'
    3
    ...
    
    $ perl -le'print 0+( @a = split " ",   " a b c " )'
    3