in reply to Re: problem with strict in perl 5.6 and asp
in thread problem with strict in perl 5.6 and asp

David using perlscript activestate 5.6 on one box and 5.8 on my test box, I pasted my errors. Tried data dumper but I am not sure I did it correctly. I just put use data::dumper; in my file, I tried the object tag too like their example in the readme neither seemed to change anything. 
Global symbol "$Request" requires explicit package name at (eval 2) li
+ne 35. Global symbol "$Session" requires explicit package name at (ev
+al 2) line 37. Global symbol "$Session" requires explicit package nam
+e at (eval 2) line 51. Global symbol "$Session" requires explicit pac
+kage name at (eval 2) line 53. Global symbol "$Response" requires exp
+licit package name at (eval 2) line 54. Global symbol "$Session" requ
+ires explicit package name at (eval 2) line 54. Global symbol "$Sessi
+on" requires explicit package name at (eval 2) line 56. Global symbol
+ "$Request" requires explicit package name at (eval 2) line 56. Globa
+l symbol "$Session" requires explicit package name at (eval 2) line 5
+8. Global symbol "$Session" requires explicit package name at (eval 2
+) line 59. Global symbol "$Session" requires explicit package name at
+ (eval 2) line 60. Global symbol "$Session" requires explicit package
+ name at (eval 2) line 62. Global symbol "$Session" requires explicit
+ package name at (eval 2) line 62. Global symbol "$Session" requires 
+explicit package name at (eval 2) line 62. Global symbol "$Request" r
+equires explicit package name at (eval 2) line 64. Global symbol "$Re
+quest" requires explicit package name at (eval 2) line 64. Global sym
+bol "$Session" requires explicit package name at (eval 2) line 68. Gl
+obal symbol "$Session" requires explicit package name at (eval 2) lin
+e 68. Global symbol "$Session" requires explicit package name at (eva
+l 2) line 68. (in cleanup) BEGIN not safe after errors--compilation a
+borted

[download]
on my 5.6.1 box I get the same. 
PerlScript Error error '80004005' 

Global symbol "$Request" requires explicit package name at (eval 2) li
+ne 34. Global symbol "$Session" requires explicit package name at (ev
+al 2) line 36. Global symbol "$Session" requires explicit package nam
+e at (eval 2) line 50. Global symbol "$Session" requires explicit pac
+kage name at (eval 2) line 52. Global symbol "$Response" requires exp
+licit package name at (eval 2) line 53. Global symbol "$Session" requ
+ires explicit package name at (eval 2) line 53. Global symbol "$Sessi
+on" requires explicit package name at (eval 2) line 55. Global symbol
+ "$Request" requires explicit package name at (eval 2) line 55. Globa
+l symbol "$Session" requires explicit package name at (eval 2) line 5
+7. Global symbol "$Session" requires explicit package name at (eval 2
+) line 58. Global symbol "$Session" requires explicit package name at
+ (eval 2) line 59. Global symbol "$Session" requires explicit package
+ name at (eval 2) line 61. Global symbol "$Session" requires explicit
+ package name at (eval 2) line 61. Global symbol "$Session" requires 
+explicit package name at (eval 2) line 61. Global symbol "$Request" r
+equires explicit package name at (eval 2) line 63. Global symbol "$Re
+quest" requires explicit package name at (eval 2) line 63. Global sym
+bol "$Session" requires explicit package name at (eval 2) line 67. Gl
+obal symbol "$Session" requires explicit package name at (eval 2) lin
+e 67. Global symbol "$Session" requires explicit package name at (eva
+l 2) line 67. (in cleanup) BEGIN not safe after errors--compilation a
+borted 

/base/base.asp, line 29

[download]
David how seriously bad is it to use no strict "vars"; my existing code makes heavy use of built in variables like $Response, $Session, and $Request. If its really bad practice or not recommended obviously I don't want to do it that way. Thanks.. Monty

Replies are listed 'Best First'.
Re^3: problem with strict in perl 5.6 and asp
by Sidhekin (Priest) on Nov 05, 2007 at 00:36 UTC

    Can't you just declare the (not quite) "built-in" variables with our? 

    use strict; # with impunity
our( $Response, $Session, $Request );

    [download]

    (our should be usable with 5.6 and later; otherwise the vars pragma could be an alternative.)

    print "Just another Perl ${\(trickster and hacker)},"
    The Sidhekin proves Sidhe did it!

[reply]
[d/l]
[select]
    A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom