Loading ...
Sorry, an error occurred while loading the content.

Fw: doubt in %main

Expand Messages
  • sathiya perl
    while (my ($key,$value) = each(%main::)) { local(*gl) = $value; print $key - $gl n ; } What does the above sample code print? Send free SMS to your Friends on
    Message 1 of 2 , Dec 21, 2006
    • 0 Attachment
      while (my ($key,$value) = each(%main::)) {

      local(*gl) = $value;

      print "$key - $gl\n";

      }


      What does the above sample code print?



      Send free SMS to your Friends on Mobile from your Yahoo! Messenger. Download Now! http://messenger.yahoo.com/download.php




      Send free SMS to your Friends on Mobile from your Yahoo! Messenger. Download Now! http://messenger.yahoo.com/download.php

      [Non-text portions of this message have been removed]
    • Mike Southern
      ... Nothing ventured, nothing gained ... Why don t you run the script and find out ...
      Message 2 of 2 , Dec 21, 2006
      • 0 Attachment
        On 12/21/06 6:09 AM, sathiya perl at perl_sathiya@... wrote:

        >
        >
        >
        > while (my ($key,$value) = each(%main::)) {
        >
        > local(*gl) = $value;
        >
        > print "$key - $gl\n";
        >
        > }
        >
        >
        > What does the above sample code print?

        Nothing ventured, nothing gained ... Why don't you run the script and find
        out ...
      Your message has been successfully submitted and would be delivered to recipients shortly.