Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

simple breakup of this code

by Anonymous Monk
on Jun 15, 2005 at 13:43 UTC ( #466913=note: print w/ replies, xml ) Need Help??


in reply to Re^3: Extracting non-consecutive but related items from an array.
in thread Extracting non-consecutive but related items from an array.

$/ is the The input record separator, newline by default (see the perlop man page; type perldoc perlop and find it). The code you posted could be re-written like this:

   foreach my $key (sort keys %clean_data) {
     print $key, $/;
     foreach my $data (@{$clean_data{$key}}) { 
    # the hash value $clean_data{$key} is an array reference
    # wrapping it in @{} gives us the array it references.
    # this array contains array references, 
    # so @$data gives us an array
        print "\t", @$data, $/;
     }
   }
- Dotan


Comment on simple breakup of this code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (12)
As of 2014-08-21 18:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (142 votes), past polls