Help for this page

Select Code to Download

Select or download this

#!perl 

...

my(@array) = qw(foo bar crap stuff);
print "$_: ".iA($_,@array),"\n" for(qw(foo dolsman crap));

Select or download this

/****************************/
  jason@gost.net, wh@ckz.org
    http://jason.gost.net
/*****************************/