Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

'our' is not 'my'

by Ovid (Cardinal)
on Aug 16, 2001 at 21:05 UTC ( #105446=perlmeditation: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
        $main::foo;
        $CGI::POST_MAX;
        @foo::bar;
    
  2. or download this
        my $foo;
        my $POST_MAX;
        my @bar;
    
  3. or download this
        Global symbol "$foo" requires explicit package name at C:\test.pl 
    +line 2.
    
  4. or download this
        package foo;
        use strict;
        our $bar;   # These are the same
        $foo::bar;  # These are the same
    
  5. or download this
        our $field;
    
  6. or download this
        use strict;
        for ( 1 .. 3 ) { &doit }
    ...
            our $foo;
            print ++$foo . "\n";
        }
    
  7. or download this
        $main::sql = $order->lineItemSQL;
        $main::dbh->prepare( $main::sql );
    
  8. or download this
        our ( $sql, $dbh );
    
    ...
    
        $sql = $order->lineItemSQL;
        $dbh->prepare( $sql );
    
  9. or download this
        use strict;
        {
    ...
            $foo = "Ovid";
        }
        print $foo;
    
  10. or download this
        use strict;
        {
    ...
            $foo = "Ovid";
        }
        print $main::foo;
    
  11. or download this
        use strict;
        my $foo = 'bar';
    ...
        }
    
        print $foo;
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (7)
As of 2014-12-29 08:17 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (185 votes), past polls