Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: Question on Regex

by Athanasius (Chancellor)
on Nov 18, 2012 at 14:20 UTC ( #1004416=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #! perl
    use strict;
    ...
    .co.uk/Jobs/Company-Sector/C8A6446X4PND86M9WYJ/Tradewind/?APath=2.21.0
    +.0.0
    .com/Stuff/Somewhere/ABCD789/Peabody/?APath=2.0.12.1.3
    .com.au/More-Stuff/Anywhere/XYZ12345/Perkins/?APath=4.5.6.7.8
    
  2. or download this
     0:14 >perl 390_SoPW.pl
    Name #1 is 'Tradewind'
    ...
    Name #3 is 'Perkins'
    
     0:18 >
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1004416]
help
Chatterbox?
[Eily]: (I wondered if overloading bool was actually necessary)
[Corion]: Yeah, you need bool to get a true value, and the rest to return the other value ;)
[choroba]: perl -wE '{package o; use Tie::Scalar; use parent -norequire => "Tie::StdScalar" ;sub FETCH { "x" x int rand 2}} tie my $x, "o" ; say $x for 1 .. 10'
[choroba]: for complete ness

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (6)
As of 2017-07-27 13:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I came, I saw, I ...
























    Results (414 votes). Check out past polls.