Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
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

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://95155]
help
Chatterbox?
[marto]: Even with shell command recall I find it less time consuming to do such things in a file.
[marto]: I very seldom use one liners for anything which isn't utterly trivial
[Discipulus]: i'm wise enough to never use my oneliners
[Discipulus]: anyway marto, i read th CB logs.. osteopat is what you need

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (7)
As of 2017-09-22 08:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    During the recent solar eclipse, I:









    Results (260 votes). Check out past polls.

    Notices?