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 }'

Comment on Perl Saroyan Download Code

Replies are listed 'Best First'.
Re: Perl Saroyan by hippo (Bishop) 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 }'` [download] There, now that's much more relaxing. ;-) 🦛	[reply] [d/l] [select]

Domain Nodelet^?

Node Status^?

node history
Node Type: poem [id://11121647]
Approved by mr_ron
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others chanting in the Monastery: (4)

As of 2024-04-25 07:50 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found