Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

grinder's scratchpad

by grinder (Bishop)
on Jun 01, 2004 at 17:46 UTC ( #358312=scratchpad: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use File::Watch;
    
    ...
        do_something( $w->get );
        sleep 10;
    }
    
  2. or download this
    #! /usr/local/bin/perl -w
    
    ...
    (?:3(?:7[012346789]?|8[234589]?|0\d?|1\d?|2\d?|3\d?|4\d?|5\d?|6\d?|9\d
    +?)|1(?:0\d?|1\d?|2\d?|3\d?|4\d?|5\d?|6\d?|7\d?|8\d?|9\d?)|2(?:0\d?|1\
    +d?|2\d?|3\d?|4\d?|5\d?|6\d?|7\d?|8\d?|9\d?)|4(?:0\d?|1\d?|2\d?|3\d?|4
    +\d?|5\d?|6\d?|7\d?|8\d?|9\d?)|5(?:[01256789]|3[01234]?|4[123]?)|7(?:[
    +123456789]|0[01234789]?)|6(?:[023456789]|1[89]?)|8\d|9\d)
    % ./ra | wc -c
         335
    
  3. or download this
    my $foo = [
      1,
    ...
    1 3 4 5
    1 3 4 6
    1 3 4 7
    
  4. or download this
    <head>
    <script language="javascript">
    ...
    <img border="0" name="oleane-th" src="oleane-thumb.png"/><br />
    <img border="0" name="completel-th" src="completel-thumb.png" />
    </body></html>
    
  5. or download this
    #! /usr/bin/perl -w
    
    ...
            $sdump->finish;
            print "\n";
    }
    
  6. or download this
    my @friends = ("merlyn","nate", "vroom", "neshura", "chromatic", "seta
    +ntae", "btrott","stephen","lhoward","ZZamboni","kudra","tilly","cogen
    +t");
    my $friend;
    $friend ||= $friends[rand(@friends)];
    $query->textfield("usersearch", $friend);
    
  7. or download this
    #! /usr/bin/perl -w
    
    ...
    openlog( basename($0), 'pid', 'daemon' );
    syslog('err', 'this is a test');
    closelog();
    

Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
[Corion]: LanX: Ah, yeah - Frankfurt is in the quake region, but at the very border. I think I've never noticed a quake in Frankfurt myself
[marto]: good morning all
[Corion]: On another topic, in the process of Rubber Duck SoPWing, I wrote a post about the best API for generating HTTP requests (not sending them) and while writing it and fleshing out my sample implementation, I came up with some improvements to my ...
[Corion]: ... existing prototype. Cartesian Products will be proud of that module once it gets out ;)
[Corion]: Hi marto ;)

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (5)
As of 2017-01-18 10:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (161 votes). Check out past polls.