Beefy Boxes and Bandwidth Generously Provided by pair Networks DiBona
Perl Monk, Perl Meditation
 
PerlMonks  

Re: The Perl Film Festival

by spudzeppelin (Pilgrim)
on Jul 10, 2001 at 00:42 UTC ( #95155=note: print w/ replies, xml ) Need Help??


in reply to The Perl Film Festival

Okay, this one may be too easy, but hey, it has to be done:

#!/usr/bin/perl use Net::Finger; my ($gold) = "\033[1;33m"; my ($ger) = "\033[0m"; my ($fin) = finger($ARGV[0]); print "$gold$fin$ger\n"; exit 0;

Spud Zeppelin * spud@spudzeppelin.com


Comment on Re: The Perl Film Festival
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (9)
As of 2014-04-18 03:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (461 votes), past polls