When I use the following code to dump a hash:

    $entry{"genre"} = $genre;
    $entry{"artist"} = $artist;
    $entry{"album"} = $album;
    $entry{"disc"} = $disc;
    $entry{"file"} = $file;
    $entry{"fullpath"} = $fullpath;

    my $dumper = Data::Dumper->new( [%entry], [ qw () ] );
    my $dumpedvalues = $dumper->Dump();
    print $dumpedvalues . "\n";

I get the following output:

$VAR1 = "album";
$VAR2 = "Prose Combat";
$VAR3 = "disc";
$VAR4 = 1;
$VAR5 = "artist";
$VAR6 = "MC Solaar";
$VAR7 = "file";
$VAR8 = "04_a_la_claire_fontaine.ogg";
$VAR9 = "genre";
$VAR10 = "French Rap";
$VAR11 = "fullpath";
$VAR12 = "/ogg/French Rap/MC Solaar/Prose
Combat/04_a_la_claire_fontaine.ogg";

I've figured out that I can use qw() to change the variable names, but
is there any way to either get an output like the code that created the
hash, or in the form:

$hash = {
           album => "Prose Combat",
           # etc...
        }

Thanks in advance,

Dan

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to