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

Re: Somersaulting camel

by eyepopslikeamosquito (Chancellor)
on Jun 28, 2002 at 07:30 UTC ( #177952=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    perl camel.pl            camel forward somersaults as before
    perl camel.pl b          camel somersaults backwards
    ...
                    "\^"^(                                ('`')|       
                  ('/'))).                               '"})');       
    ------------------------------------------------------------------
    
  2. or download this
    use Acme::EyeDrops qw(sightly);
    my $src = <<'END_SRC_STR';
    ...
    my $max = 0; length > $max and $max = length for @a;
    $_ .= ' ' x ($max - length) for @a;
    print " $_ \n" for @a;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://177952]
help
Chatterbox?
[LanX]: Yeah option a doesn't go into history
[LanX]: probably I need to teach the app to restart after C-c Kill
[Corion]: LanX: Maybe have an infinite-loop cmd file? Much easier than trying to manage that from within Perl IMO
[Corion]: Alternatively, relaunch the application from cron (or a Windows cron) every minute
[LanX]: will try infinite loop ...
[Corion]: :START ... goto START
[LanX]: oh .bat you mean?
[LanX]: obscure cult ...
[Corion]: LanX: cmd.exe is just another way to launch Perl
[LanX]: I know its a cult... and I repent it every time

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (13)
As of 2017-03-27 15:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Should Pluto Get Its Planethood Back?



    Results (320 votes). Check out past polls.