Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re^13: Help with pushing into a hash

by Kenosis (Priest)
on Sep 02, 2012 at 22:17 UTC ( #991332=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    next unless /(E7F888)\s+.+=([^\s]+)/;
     push @activline, "$1 | $2 | $activ{$1} \n" if $activ{$1};
    
    print @activline;
    
  2. or download this
    next unless /(E7F888)\s+.+=([^\s]+)/;
    say;
    exit;
    
  3. or download this
    /(.{6})\s+.+=([^\s]+)/
    
  4. or download this
    push @activline, "$1 | $2 | $activ{$1} \n" if $activ{$1};
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://991332]
help
Chatterbox?
[Corion]: choroba: Well, the "pricewatch" application is just one cronjob to call App::scrape, and then pipe the results to App::sql-insert- json , and a second cron job to run DBIx::RunSQL :)
[Corion]: (and the SQL files to create the database and to run the query :) )
[Corion]: So, the application I'm writing this for is more a nice use case of these command line tools and less an application in its own right, except that I get use out of it :)

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (8)
As of 2018-02-23 19:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    When it is dark outside I am happiest to see ...














    Results (310 votes). Check out past polls.

    Notices?