RE: variable definition error not caught when using strict and warnings

From: Rob Dixon [rob.di...@gmx.com] Sent: 09 November 2012 17:17 To: beginners@perl.org Cc: Nemana, Satya Subject: Re: variable definition error not caught when using strict and warnings On 09/11/2012 17:08, Nemana, Satya wrote: > Hi > > I am

Re: variable definition error not caught when using strict and warnings

On 09/11/2012 17:08, Nemana, Satya wrote: Hi I am a little confused with this program Program: use strict; use warnings; if ($999 == 1056) { print ("\nequal"); } else { print ("\nnot equal"); } What I expect: Perl to throw me an error as $999 variable is not defined, but perl execu

Re: variable definition error not caught when using strict and warnings

On Fri, Nov 9, 2012 at 11:08 AM, Nemana, Satya wrote: > > if ($999 == 1056) > { > print ("\nequal"); > } > else > { > print ("\nnot equal"); > } > > What I expect: Perl to throw me an error as $999 variable is not defined, > but perl executes the code with a warning.(I don't expect the co

Re: variable definition error not caught when using strict and warnings

On Fri, Nov 9, 2012 at 11:08 AM, Nemana, Satya wrote: > Program: > use strict; > use warnings; > > if ($999 == 1056) > { > print ("\nequal"); > } > else > { > print ("\nnot equal"); > } > > What I expect: Perl to throw me an error as $999 variable is not defined, > but perl executes the c

variable definition error not caught when using strict and warnings

Hi I am a little confused with this program Program: use strict; use warnings; if ($999 == 1056) { print ("\nequal"); } else { print ("\nnot equal"); } What I expect: Perl to throw me an error as $999 variable is not defined, but perl executes the code with a warning.(I don't expect th

Re: need some help using strict??

> ""FamiLink" == "FamiLink Admin" <[EMAIL PROTECTED]> writes: "FamiLink> I am trying to verify a credit card number format with the following: (below) "FamiLink> but I am getting errors like: Why not just use Business::CreditCard? -- Randal L. Schwartz - Stonehenge Consulting Services, Inc

Re: need some help using strict??

On 4/27/07, FamiLink Admin <[EMAIL PROTECTED]> wrote: I am trying to verify a credit card number format with the following: (below) but I am getting errors like: Global symbol "%r" requires explicit package name at ./modmember.cgi line 681. This is because, under 'use strict', you must declar

need some help using strict??

I am trying to verify a credit card number format with the following: (below) but I am getting errors like: Global symbol "%r" requires explicit package name at ./modmember.cgi line 681. Global symbol "%r" requires explicit package name at ./modmember.cgi line 683. Global symbol "%r" requires

RE: not using strict problems

Brent Clark wrote: : Hi list : : I have a problem whereby another new programmer (like myself) : likes NOT to use strict in his code where by I do. : : The problem is that I have is that he as writting a pm file and : basically just did is as so: [snipped code] One

Re: not using strict problems

I have a problem whereby another new programmer (like myself) likes NOT to use strict in his code where by I do. My own anecdote: I didn't think that using the 'strict' or 'warnings' pragmas was important either, once. And I'm a very novice programmer. However, when I thought about, I alw

RE: not using strict problems

> -Original Message- > From: Brent Clark [mailto:[EMAIL PROTECTED] > Sent: Friday, August 19, 2005 3:40 AM > To: Beginners Perl > Subject: not using strict problems > > Hi list > > I have a problem whereby another new programmer (like myself) likes NOT to >

Re: not using strict problems

Hi Brent, it shouldn't be a problem the way he wrote the pm, unless he doesn't 'return' anything in the subroutines. I had a similar problem having to convert a pm and the script I was using into 'strict'. I values that I could use between the pm and the script when 'strict' was off couldn't

not using strict problems

Hi list I have a problem whereby another new programmer (like myself) likes NOT to use strict in his code where by I do. The problem is that I have is that he as writting a pm file and basically just did is as so: use pm file &somename; sub somename { $var1 = $linex[0]; $va

Re: Having trouble using "strict"

Oh, I got the main direction, thank you very much! John Moon wrote: Subject: Having trouble using "strict" Hello there! I got a trouble (I think). I'd like to store some variables in a separated file ie vars.pl to have a possibility of using them in different scripts by 're

RE: Having trouble using "strict"

Subject: Having trouble using "strict" Hello there! I got a trouble (I think). I'd like to store some variables in a separated file ie vars.pl to have a possibility of using them in different scripts by 'require "vars.pl"'. So if I use some script using the

Having trouble using "strict"

.pl' and I call this variable with using 'strict' pragma I get error message - $var1 is unknown for this script of course because 'strict' is on; I must declare this with "my". But in this case I hade the value of this variable. How could I solve this trouble? Th

RE: using strict

Guay Jean-SÃbastien wrote: > I am sorry David, it just seems like I am having trouble communicating > clearly. We are apparently in a disagreement, but your points are not at > all what I wanted to explain... I'll try again. i totally understand what you are saying and like i said before, your po

RE: using strict

Hello Joseph, David, > A stronger argument has to do with mindset. The || operator is an > expression evaluation operator, appropriate to mathematical or paramathematical > expressions. The context really calls for a flow-control operator, or. Thanks for making my point better than I could, Jos

RE: using strict

Hello Joseph, > One thing I would request is that you trim off any material to which you are not > responding from old posts. This helps keep bandwidth and storage needs down. I'll keep that in mind. I usually don't keep all the thread of replies that Outlook ( grrr) keeps at the bottom, seems l

RE: using strict

I am sorry David, it just seems like I am having trouble communicating clearly. We are apparently in a disagreement, but your points are not at all what I wanted to explain... I'll try again. > you should test it yourself. i am not sure how good you are > with Perl and i > don't want to sound lik

Re: using strict

Paul Johnson wrote: > On Sun, Apr 04, 2004 at 01:28:42PM -0700, R. Joseph Newton wrote: > > > Guay Jean-Sébastien wrote: > > > > > > my $errors = 0; > > > open (CRITICALSERVERS, "$crout") || $errors += 2; > > > > > > that will translate to: > > > > > > my $errors = 0; > > > ( open (CRITICALSERVERS

Re: using strict

On Sun, Apr 04, 2004 at 01:28:42PM -0700, R. Joseph Newton wrote: > Guay Jean-Sébastien wrote: > > > > my $errors = 0; > > open (CRITICALSERVERS, "$crout") || $errors += 2; > > > > that will translate to: > > > > my $errors = 0; > > ( open (CRITICALSERVERS, "$crout") || $errors ) += 2; > > Nope.

Re: using strict

Guay Jean-Sébastien wrote: > > There is no problem syntactically. But there is a problem with the > precdence. If you ever have another operation on either the left or right > side of the || operator, the || operator will bind tighter than the other > operation. So for example, if you do: > > my $

Re: using strict

david wrote: > Guay Jean-Sébastien wrote: > > > >> open (CRITICALSERVERS, "$crout") || die "can't open file \n: $!"; > > > > As I said, you should replace || by or in the above line. See the > > precedence rules in "perldoc perlop" for details. > > > > why do you think so? is there any problem in

Re: using strict

Guay Jean-Sébastien wrote: > Hello Derek, > > > Guay, > > Err, my first name is Jean-Sebastien. Hi Jean-Sebastien, > My last name is Guay. French-language > people have a bad habit to put the last name first, as in "Guay, > Jean-Sebastien"... So I understand why this is a bit confusing. Thanks

Re: using strict

[EMAIL PROTECTED] wrote: > Yet another great explanation.. What explanation? I see niothing above this. Please do not top-post when posting to this list. Instead, follow the material to which you are directly responding with your response, then trim any extraneous material. Most of us keep re

RE: using strict

Guay Jean-SÃbastien wrote: >> Guay Jean-SÃbastien wrote: >>> open (CRITICALSERVERS, "$crout") || die "can't open file \n: $!"; >>> >>> As I said, you should replace || by or in the above line. See the >>> precedence rules in "perldoc perlop" for details. >> >> why do you think so? is there

RE: using strict

Hello Derek, > can I email you from know on??? : ) You are so through! Thank you! No, I would prefer that you always reply to the list. First reason is that other beginners can benefit from our exchange (and the mails end up in a searchable archive), second is that if I'm not there (or for th

RE: using strict

construct instead of the array assuming memory is not an issue? Derek B. Smith OhioHealth IT UNIX / TSM / EDM Teams Guay Jean-Sébastien <[EMAIL PROTECTED]> 04/02/2004 02:20 PM To: Perl Beginners <[EMAIL PROTECTED]> cc: Subject: RE: using strict

RE: using strict

> Guay Jean-SÃbastien wrote: >> >>> open (CRITICALSERVERS, "$crout") || die "can't open file \n: $!"; >> >> As I said, you should replace || by or in the above line. See the >> precedence rules in "perldoc perlop" for details. > > why do you think so? is there any problem in the above line? The

RE: using strict

Guay Jean-SÃbastien wrote: > >> open (CRITICALSERVERS, "$crout") || die "can't open file \n: $!"; > > As I said, you should replace || by or in the above line. See the > precedence rules in "perldoc perlop" for details. > why do you think so? is there any problem in the above line? david -- s

RE: using strict

t $line . "\n"; } As you can see, it is very similar, but since we get the whole file into the array, we can close it right after, and also we loop over the array instead of looping and getting one line at a time until we get to the end of the file. Hope this helps, Jean-Sébasti

Re: using strict

[EMAIL PROTECTED] wrote: Yet another great explanation... thank you! But I still need to know how to print each specific element # along with its data? Is this the right way to go for storing each line in its own element??? while $line < FILEHANDLE > my @tsm = < FILEHANDLE > foreach $_ (@tsm)

Re: using strict

int $_ , "\n"; Derek B. Smith OhioHealth IT UNIX / TSM / EDM Teams [EMAIL PROTECTED] 04/01/2004 06:02 PM To: [EMAIL PROTECTED], [EMAIL PROTECTED] cc: Subject: Re: using strict In a message dated 4/1/2004 5:03:40 PM Eastern Standard Time, [E

RE: using strict

t; cc: Subject:RE: using strict Hello Derek, When using strict, the error message should point you to the line where the error is. It's usually pretty darn good at pointing the right line. In this case, I bet it's this one: >while ( defined($line = )

Re: using strict

[EMAIL PROTECTED] wrote: Does the following turn off strict for a vars? no strict "vars"; Could you also turn off strict for other things besides vars, refs and subs? Say for a subroutine (for example). Pragma are block/file scoped similar to a lexical. To answer your question below, yes you c

Re: using strict

In a message dated 4/1/2004 5:03:40 PM Eastern Standard Time, [EMAIL PROTECTED] writes: People of the Perl, >from my understanding strict disallows soft references, ensures that all >variables are declared before usage and disallows barewords except for >subroutines. > >what is a soft referen

Re: using strict

Does the following turn off strict for a vars? no strict "vars"; Could you also turn off strict for other things besides vars, refs and subs? Say for a subroutine (for example). Just curious. I've run into situations where I've come across badly maintained code and would like to do this for

Re: using strict

On 4/1/2004 5:01 PM, [EMAIL PROTECTED] wrote: People of the Perl, from my understanding strict disallows soft references, ensures that all variables are declared before usage and disallows barewords except for subroutines. what is a soft reference? what is a bareword? why is strict disallowin

Re: using strict

--As of Thursday, April 1, 2004 5:01 PM -0500, [EMAIL PROTECTED] is alleged to have said: what is a soft reference? what is a bareword? why is strict disallowing a compile here When I comment out strict the syntax checks outs as ok!??? how do I display each element # with its corresponding

RE: using strict

Hello Derek, When using strict, the error message should point you to the line where the error is. It's usually pretty darn good at pointing the right line. In this case, I bet it's this one: >while ( defined($line = ) ) { There is no declaration of the $line variable. Try

using strict

People of the Perl, from my understanding strict disallows soft references, ensures that all variables are declared before usage and disallows barewords except for subroutines. what is a soft reference? what is a bareword? why is strict disallowing a compile here When I comment out strict

RE: using strict and -w

> -Original Message- > From: Robert "Beau" Link [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, April 30, 2002 8:27 PM > To: [EMAIL PROTECTED] > Subject: using strict and -w > > ... And where might I have found that answer within > perldoc? I tri

Re: using strict and -w

On Tuesday, April 30, 2002, at 05:27 , Robert Beau Link wrote: [..] > #!/usr/bin/perl -w > > use strict; > > print "Number, please..."; > $alpha = ; > print "Another, please..."; > $beta = ; > $sum= $alpha + $beta; > $diff = $alpha - $beta; > $product = $alpha * $beta; > $quotient = $alpha / $bet

using strict and -w

-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Howdy, Thanks to Matt for pointing me in the right direction re: mod_perl. Here's my latest: working through the perl tutorial docs at http://www.devshed.com/Server_Side/Perl/Perl101/Perl101_2/page3.html I've created the code that follows; typed

Re: Using strict and getting return values

--- Dermot Paikkos <[EMAIL PROTECTED]> wrote: > Hi Gurus, > > I am trying to get tidy with my scripts and want to > use Strict Use lowercase for strict! Anything else will cause havoc. > but am having difficulty with return values from > subroutines. I have the following snippet: > > whi

RE: Using strict and getting return values

> -Original Message- > From: Dermot Paikkos [mailto:[EMAIL PROTECTED]] > Subject: Using strict and getting return values > > Hi Gurus, Well, I'm definitely not a guru, but I think I might be able to help... :) > > I am trying to get tidy with my scripts and

Using strict and getting return values

Hi Gurus, I am trying to get tidy with my scripts and want to use Strict but am having difficulty with return values from subroutines. I have the following snippet: while (defined(my $i =<$fh>)) { chomp($i); my @a = split(/|/,$i); my $last = $a[1]; my $first = $a[0]; if (

Re: Filehandle error using Strict

Deborah Strickland wrote: > > Hi all, I've had this question for quite a while and can't find any > reference to it in any of my many Perl books. I want to use the 'strict' > command but whenever I do it always causes an error on any file handles > I have used. What errors are you getting? > I

Re: Filehandle error using Strict

ot;); while () { print; } close FILE; ---snip--- Ron >From: Deborah Strickland <[EMAIL PROTECTED]> >To: [EMAIL PROTECTED] >Subject: Filehandle error using Strict >Date: Tue, 04 Sep 2001 10:17:04 -0700 > >Hi all, I've had this

Re: using Strict with filehandles

Deborah Strickland wrote: > > Hi, > I can't find the answer to this in any of my many Perl books so I'm > asking you. I want to do 'use strict' but when I also use it with a file > handle I get an error. How can I declare a file handle variable such > that 'use strict' won't generate an error? >

using Strict with filehandles

Hi, I can't find the answer to this in any of my many Perl books so I'm asking you. I want to do 'use strict' but when I also use it with a file handle I get an error. How can I declare a file handle variable such that 'use strict' won't generate an error? This fails. use strict; open (FN, $someF

Filehandle error using Strict

Hi all, I've had this question for quite a while and can't find any reference to it in any of my many Perl books. I want to use the 'strict' command but whenever I do it always causes an error on any file handles I have used. I always declare everything but have never seen a filehandle declared be

Re: using strict - ADDENDUM

On Wed, 27 Jun 2001, Brett W. McCoy wrote: > But you can't say $file = "CHR1", beacuse then you are creating a symbolic > reference to a filehandle. Very bad. Do this instead: > > $file = *CHR1; > > Then you can properly use your filehandle. What you really want to do is > create an array of o

Re: using strict - ADDENDUM

On Wed, 27 Jun 2001, Hans Holtan wrote: > I forgot to mention that I did open the output files earlier in the > program, ie CHR1, CHR3 ... CHR5. But you can't say $file = "CHR1", beacuse then you are creating a symbolic reference to a filehandle. Very bad. Do this instead: $file = *CHR1; The

Re: using strict

On Wed, 27 Jun 2001, Hans Holtan wrote: > I get this error when I run my script, and I don't understand why: > > "Can't use string ("CHR3") as a symbol ref while "strict refs" in use > at AtIntergenicTableSort.pl line 53. " > > I'm trying to split my output into 5 seperate files based on what is

Re: using strict

On Wed, Jun 27, 2001 at 04:54:17PM -0700, Paul wrote: > Another trick -- use FileHandle and put them into an array. > > my @FILE; > for (1..5) { > $FILE[$_] = new FileHandle "CHR$_" or die "CHR$_: $!"; > } > > now you can say: > > print $FILE[$_] ">$k\t$all_genes{$k}\n"; This do

Re: using strict - ADDENDUM

On Wed, Jun 27, 2001 at 04:53:04PM -0700, Hans Holtan wrote: > #!usr/bin/perl -w > use strict; Add: use IO::File; > > > my ($input,$output,$k,$v,$gene, $input_string, Replace this: > $output1,$output2,$output3,$output4,$output5, with this: @filehandles, > $file, $junk,$i,

RE: using strict

nd put them into an array. my @FILE; for (1..5) { $FILE[$_] = new FileHandle "CHR$_" or die "CHR$_: $!"; } now you can say: print $FILE[$_] ">$k\t$all_genes{$k}\n"; > > -Original Message- > > From: Hans Holtan [mailto:[EMAI

using strict - ADDENDUM

Hi everyone, I forgot to mention that I did open the output files earlier in the program, ie CHR1, CHR3 ... CHR5. Here is the whole thing: #!usr/bin/perl -w use strict; my ($input,$output,$k,$v,$gene, $input_string, $output1,$output2,$output3,$output4,$output5, $file, $junk,$i,

RE: using strict

FILE); last; } That's if you want your files to be CHR1, CHR2, etc... > -Original Message- > From: Hans Holtan [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, June 27, 2001 4:36 PM > To: [EMAIL PROTECTED] > Subject: using strict &

using strict

Hi everyone, I get this error when I run my script, and I don't understand why: "Can't use string ("CHR3") as a symbol ref while "strict refs" in use at AtIntergenicTableSort.pl line 53. " I'm trying to split my output into 5 seperate files based on what is in the key. Here is a snip of code