Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Perl Saroyan

by Anonymous Monk
on Sep 12, 2020 at 00:56 UTC ( [id://11121647]=poem: print w/replies, xml ) Need Help??

perl -e 'use Time::HiRes qw(usleep); foreach $i (1..145) { print join("", (" " x 72)) . "crickets\n"; usleep 550000 }'

Replies are listed 'Best First'.
Re: Perl Saroyan
by hippo (Archbishop) on Sep 12, 2020 at 10:48 UTC

    $i is unused and the join does nothing.

    perl -e 'use Time::HiRes qw(usleep); for (1..145) { print " " x 72 . " +crickets\n"; usleep 550000 }'

    There, now that's much more relaxing. ;-)


    🦛

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: poem [id://11121647]
Approved by mr_ron
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others cooling their heels in the Monastery: (2)
As of 2025-07-07 19:11 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.