Re: perl -s and use strict
- From: "Paul Lalli" <mritty@xxxxxxxxx>
- Date: 29 Mar 2007 04:30:35 -0700
On Mar 29, 2:35 am, sarthak.patn...@xxxxxxxxxxx (Sarthak Patnaik)
wrote:
Hello,
I have a small script:
#!/usr/bin/perl -ws
use strict;
print $k;
As I am using "use strict;", it is giving the following message:
Variable "$k" is not imported at ./test.pl line 3.
Global symbol "$k" requires explicit package name at ./test.pl line 3.
Execution of ./test.pl aborted due to compilation errors.
Is there any workaround for this, so that I can use strict and -s together.
There's no work around needed, because there's no issue. Both -s and
strict are working correctly... you're just making false assumptions.
-s created the global variable $main::k. That variable exists, and
you can use it, no problem.
'use strict' prevents you from referring to global variables by their
"short" names (ie, without "fully qualifying" them). So you can't say
"$k" when you mean "$main::k".
The 'our' keyword is how you tell Perl that you want to refer to a
variable by its short name for the duration of this lexical scope,
even though strict is in use.
#!/usr/bin/perl -s
use strict;
use warnings;
print "K: $main::k\n";
our $k; #now, I can call that variable just $k
print "K: $k\n";
__END__
Hope this helps,
Paul Lalli
.
- References:
- perl -s and use strict
- From: Sarthak Patnaik
- perl -s and use strict
- Prev by Date: RE: sending output to file and terminal (in Unix use "tee")
- Next by Date: Re: perl -s and use strict
- Previous by thread: Re: perl -s and use strict
- Next by thread: Re: perl -s and use strict
- Index(es):
Relevant Pages
|
|
