[Date Prev][Date Next][Thread Prev][Thread Next]
[Search]
[Date Index]
[Thread Index]
Re: [FWP] Collection.pm
- To: fwp@technofile.org (Fun With Perl)
- Subject: Re: [FWP] Collection.pm
- From: kpreid@attglobal.net (Kevin Reid)
- Date: Tue, 20 Feb 2001 11:07:09 -0500
- Delivered-To: irons-bumppo:net-mpfwp@bumppo.net
- In-Reply-To: <013b01c09aaf$8337a430$05011b0a@cadp.org>
- Organization: Reid & Hoffman
Dirk Bremer wrote:
> > package Collection;
>
> Kevin,
>
> Please excuse my ignorance, but what does your code do?
Phooey. I was sort-of intending that as a puzzle. Well, if you really
want to know without studying the code, run or ROT13 this:
#!/usr/bin/perl -w
$_ = <<EOT; tr/A-Za-z/N-ZA-Mn-za-m/; print;
Na vafgnapr bs Pbyyrpgvba pbagnvaf na neenl bs bowrpgf, naq jura n
zrgubq bgure guna 'arj' be 'QRFGEBL' vf pnyyrq ba gur Pbyyrpgvba, gur
zrgubq vf pnyyrq ba nyy bowrpgf va gur neenl.
N inevngvba ba gur tvira vzcyrzragngvba jbhyq or gb unir 'arj' gnxr n
ersrerapr gb n fhoebhgvar gung ergheaf gur yvfg bs bowrpgf gb hfr, guhf
nyybjvat gur Pbyyrpgvba gb or 'yvir'.
EOT
__END__
--
Kevin Reid: | Macintosh:
"I'm me." | Think different.
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe