Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: Re: (jptxs) I pity da foo who forgets to add a title

by jptxs (Curate)
on Nov 17, 2000 at 10:47 UTC ( #42173=note: print w/ replies, xml ) Need Help??


in reply to Re: I pity da foo who forgets to add a title
in thread I pity da foo who forgets to add a title

package MrT; use strict; use Exporter; use vars qw(@ISA @EXPORT_OK); @ISA = qw(Exporter); @EXPORT_OK = qw(&tprint); sub tprint { my @sayings = ( 'I pity the fool that ', 'The sucka better ', 'Maybe you should come over here and see what a real man is li +ke cause ', '"No way you gettin me in that airplane" said Mr. T as he fain +ted and '); my $choice = rand 4; print $sayings[$choice], @_; } 1;
<myExperience> $mostLanguages = 'Designed for engineers by engineers.'; $perl = 'Designed for people who speak by a linguist.'; </myExperience>


Comment on Re: Re: (jptxs) I pity da foo who forgets to add a title
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://42173]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2014-09-23 07:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (211 votes), past polls