Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

output of dumper

by Anonymous Monk
on Mar 23, 2004 at 21:44 UTC ( #339211=note: print w/replies, xml ) Need Help??


in reply to regex issue

This node falls below the community's threshold of quality. You may see it by logging in.

Replies are listed 'Best First'.
Re: output of dumper
by tcf22 (Priest) on Mar 23, 2004 at 22:27 UTC
    First off $9YT isn't a valid valiable name. Variables can start with letters and underscores only. Using Data::Dumper should get almost what you want. There are no my's and i'm not sure how to get them, or if it is even possible with Data::Dumper.
    use strict; use warnings; use Data::Dumper; my $ER = 34; my $YT = 44; my $EE = 66; print Data::Dumper->Dump([$ER, $YT, $EE], [qw(ER YT EE)]); __OUTPUT__ $ER = 34; $YT = 44; $EE = 66;

    - Tom

      First off $9YT isn't a valid valiable name

      It is if you do enough tricks.

      $ perl -MData::Dumper -le '$f = "9YT"; $$f = "foo"; print Data::Dumper +::Dumper(\%main::)' $VAR1 = { # snip '9YT' => *{'::9YT'}, # snip };

      With symbol table lookups and symbolic refs, pretty much anything is possible in a Perl variable name. I don't know of a way to get lexicals to do this, though.

      ----
      : () { :|:& };:

      Note: All code is untested, unless otherwise stated

Re: output of dumper
by hardburn (Abbot) on Mar 23, 2004 at 21:49 UTC

    What have you tried so far?

    ----
    : () { :|:& };:

    Note: All code is untested, unless otherwise stated

Re: output of dumper
by DamnDirtyApe (Curate) on Mar 25, 2004 at 05:44 UTC

    This seems like what you want:

    #! /usr/bin/perl use strict; use warnings; use Data::Dumper; my $str; do { local $/; $str = <DATA>; }; my $hash = { split /\s+/, $str }; print Dumper $hash; __DATA__ ER 34 9YT 44 EE 66

    _______________
    DamnDirtyApe
    Those who know that they are profound strive for clarity. Those who
    would like to seem profound to the crowd strive for obscurity.
                --Friedrich Nietzsche

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://339211]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (2)
As of 2021-12-08 01:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    R or B?



    Results (34 votes). Check out past polls.

    Notices?