Shawn Milochik wrote:
> 
> Just a couple of questions about your corrections:  (All snippets are taken
> from the e-mail below.)
> 
> > Shawn:
> > sub parseFrom400 {
> >     my $value = @_[0];
>                   ^^^^^
> John:
> You want a scalar here, not an array slice.
> 
>      my $value = $_[0];
> 
> Shawn:
> Okay.  I just put this in because I saw the syntax somewhere else.  Why is
> this better?  It works fine as it is.

Unless you have warnings enabled.

$ perl -wle'@a = qw/a b c d/;  $x = @a[0];  print $x'
Scalar value @a[0] better written as $a[0] at -e line 1.
a

You should enable warnings and strict when developing programs to catch
mistakes like this.



> Shawn:
> >     my $delimiter = substr($value, 3, 1);
> >     if ($delimiter =~ /[0-9]./){
>                               ^
> John:
> Do you want to match any character except newline here or a literal
> dot?  Since $delimiter only contains one character trying to match two
> characters will never work.
> 
>       if ( $delimiter =~ /\d/ ) {
> 
> Shawn:
> I wanted to find out if the character is numeric.  I see that your line
> above is exactly what I really wanted.  It seems to be working, though.
> The database I'm
> ultimately populating with this data seems to be okay.  Does what I wrote
> do the same thing, although in an ugly way?

No, your regular expression was trying to match two characters however
the variable $delimiter only contains one character.



John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to