better and great hash

Discussion in 'Perl Misc' started by john swilting, Aug 25, 2007.

  1. I would wish to store the result of the loop while in a list. I must make
    how?

    #!/usr/bin/perl -w

    use strict;
    use warnings;

    my %Conf;
    $Conf{XferMethod} = 'rsync';
    $Conf{XferLogLevel} = 1;
    $Conf{RSyncShareName} = '___1___';
    $Conf{ClientNameAlias} = '___2___';

    while(my($clef, $valeur) = each (%Conf)) {
    print "$clef => $valeur","\n";
    }
    john swilting, Aug 25, 2007
    #1
    1. Advertising

  2. john swilting

    Guest

    john swilting <> wrote in message-id: <46d00284$0$27385$>

    >
    >
    > I would wish to store the result of the loop while in a list. I must make
    > how?
    >
    > #!/usr/bin/perl -w
    >
    > use strict;
    > use warnings;
    >
    > my %Conf;
    > $Conf{XferMethod} = 'rsync';
    > $Conf{XferLogLevel} = 1;
    > $Conf{RSyncShareName} = '___1___';
    > $Conf{ClientNameAlias} = '___2___';
    >
    > while(my($clef, $valeur) = each (%Conf)) {
    > print "$clef => $valeur","\n";
    > }


    Assuming you mean store to disk... use DBM::Deep
    , Aug 25, 2007
    #2
    1. Advertising

  3. john swilting <> wrote:
    >
    > I would wish to store the result of the loop while in a list.



    perldoc -f push


    > I must make
    > how?
    >
    > #!/usr/bin/perl -w
    >
    > use strict;
    > use warnings;
    >
    > my %Conf;
    > $Conf{XferMethod} = 'rsync';
    > $Conf{XferLogLevel} = 1;
    > $Conf{RSyncShareName} = '___1___';
    > $Conf{ClientNameAlias} = '___2___';



    my @list;


    > while(my($clef, $valeur) = each (%Conf)) {
    > print "$clef => $valeur","\n";



    push @list, "$clef => $valeur\n";


    > }



    --
    Tad McClellan
    email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
    Tad McClellan, Aug 25, 2007
    #3
    1. Advertising

Want to reply to this thread or ask your own question?

It takes just 2 minutes to sign up (and it's free!). Just click the sign up button to choose a username and then you can ask your own questions on the forum.
Similar Threads
  1. Peter Bencsik
    Replies:
    2
    Views:
    805
  2. rp
    Replies:
    1
    Views:
    478
    red floyd
    Nov 10, 2011
  3. Srijayanth Sridhar
    Replies:
    19
    Views:
    581
    David A. Black
    Jul 2, 2008
  4. Eric I.
    Replies:
    0
    Views:
    231
    Eric I.
    Oct 5, 2008
  5. john swilting

    great and better hash eval

    john swilting, Aug 26, 2007, in forum: Perl Misc
    Replies:
    12
    Views:
    195
    Tad McClellan
    Aug 31, 2007
Loading...

Share This Page