> Yup, that's right. So to get it to only have the one call, change your
> "use" to a require and put it in the BEGIN block.
<nitpick number="1">
use fred;
Will also call fred->import(), so you might want to emulate that too.
</nitpick>
<nitpick number="2" type="lesser">
> --
> Robert Price - Technical Manager - EMAP Digital Travel | Tel: 0207 3092711
> Priory Court, 30-32 Farringdon Lane, London, EC1R 3AW | Fax: 0207 3092718
>
Shouldn't these numbers be formatted 020 7XXXXXXX
Later.
Mark.
</nitpick>
--
print "\n",map{my$a="\n"if(length$_>6);' 'x(36-length($_)/2)."$_\n$a"} (
Name => 'Mark Fowler', Title => 'Technology Developer' ,
Firm => 'Profero Ltd', Web => 'http://www.profero.com/' ,
Email => '[EMAIL PROTECTED]', Phone => '+44 (0) 20 7700 9960' )