Re: The List

[Mark Fowler]

> "Perl 4" ne "Perl". "Perl 4" eq "rotten, flea-bitten camel carcass". "Perl
> 5" eq "Perl".

"Perl 5" ne "Perl", "Perl 5.6" eq "Perl"

-- 
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'      )