Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re: get the filename from CGI::UploadEasy

by doc_faustroll (Scribe)
on Apr 03, 2006 at 01:42 UTC ( #540834=note: print w/ replies, xml ) Need Help??

in reply to get the filename from CGI::UploadEasy

You are in the land of a reference to a hash of hashes. If you are just learning the language and the idioms are unfamiliar to you, you might explicitly dereference first off to simplify

read perldoc perlref

my $ref = $ue->filinfo; my %HoH = %{$ref};
Then you have a hash or hashes which is a hash in which the keys are the filenames and the values are hash references.

the canonical print idiom from perldoc perdsc is: (although your taste may differ once you develop it):

foreach my $filename ( keys %HoH ) { print "$filename: { "; for my $key ( keys %{ $HoH{$filename} } ) { print "$key =$HoH{$filename}{$key} "; } print "}\n"; }

Comment on Re: get the filename from CGI::UploadEasy
Select or Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (4)
As of 2015-10-07 01:31 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (169 votes), past polls