Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

AnomalousMonk's scratchpad

by AnomalousMonk (Chancellor)
on Oct 21, 2008 at 08:28 UTC ( #718401=scratchpad: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    GotToBTru (21apr15):
    c:\@Work\Perl>perl -wMstrict -MData::Dump -le
    ...
    [\21, \46]
    
    { a => 1, b => 21, c => 3, d => 46, e => 5, f => 6 }
    
  2. or download this
    # paste_to_cbddd.pl    paste to clipboard                   24may12waw
    
    ...
    
    C:\@Work\Perl\clipboard>perl -wMstrict -e "print \" \\\\\\\\\\\\\\\" \
    +""
     \\\"
    
  3. or download this
    @ECHO OFF
    
    ...
    
    
    :END
    
  4. or download this
    
    =comment
    ...
         # { $preceding_embedded_qqs++ if $1 eq q{"};  $escape{$1} }xmsge;
    
    print "~$param~";
    
  5. or download this
    >perl -wMstrict -le
    "persist();
    ...
    
    0
    1
    
  6. or download this
    # SelTran.pm        selective translation                   31jan10waw
    
    ...
    
    
    1;
    
  7. or download this
    # SelTran.t         test selective translation              31jan10waw
    
    ...
        my ($from, $to) = @$ar_vector;
        is $xlate->($from), $to;
        }
    

Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
[1nickt]: kgb not quite as simple as ... and ...; are interchangeable. There are edge cases, shown in perlsyn.
[1nickt]: Hm well actually I guess it's not the trailing semi-colon that's at issue there, it's disambiguation between the ellipsis and the binary flip-flop
[1nickt]: Although the example given does not produce an error as stated, on my perl.
[1nickt]: perl -wE 'say for map { ... } 1..3;' # "Unimplemented at -e line 1" ... <c>perlsyn says that should throw a syntax error...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (9)
As of 2017-11-18 19:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:













    Results (277 votes). Check out past polls.

    Notices?