in reply to Origin of 'md5sum' and 'sh' logs

I am not sure what's going on here. But do you have use strict; use warnings; at the top of your script?

if (-e $filepath)
{
   my $exception...
}
else
{
   my $exception...
}

[download]
shouldn't compile. In general a "my" variable cannot be declared within a conditional statement.
EDIT: yes this will compile, but $exception cannot be used outside of its lexical scope.

$exception is reference to a hash: 

#!/usr/bin/perl
use strict;
use warnings;

my $exception = {table      => 'tablename',
                 exception  => 'outofdate'};
                 
my $exception2 =  {table      => 'tablename2',
                   exception  => 'allOk'};
                   
foreach my $error ($exception, $exception2 )
{
   print "$error->{exception}\n";
}
__END__
outofdate
allOk

[download]

Replies are listed 'Best First'.
Re^2: Origin of 'md5sum' and 'sh' logs
by morgon (Priest) on Feb 26, 2019 at 01:22 UTC
    In general a "my" variable cannot be declared within a conditional statement.
    Of course it can. Why should this be a problem?

    You can declare a "my" variable in any lexical scope - the branches of an if-statement are just one example: 

    use strict;

my $whatever;

if($whatever) {
 my $something = "here";
}
else {
 my $something = "there";
}

print "look I compiled\n";

    [download]
[reply]
[d/l]
      can declare a "my" variable in any lexical scope. Well, ok but you can't use it outside of that scope. The OP's indenting is confusing to me. Your code works until you try to use $something outside of lexical scope. 
      #!/usr/bin/perl
use strict;
use warnings;

my $whatever;

if($whatever) {
   my $something = "here";
}
else {
   my $something = "there";
}

print "look I compiled $something\n";

__END__

Global symbol "$something" requires explicit package name (did you for
+get to declare "my $something"?) 
at Monks\Badcode.pl line 14.
Execution of Monks\Badcode.pl aborted due to compilation errors.

Process completed with exit code 255

      [download]
[reply]
[d/l]
        Of course you can't use it outside of it's scope.

        There is a reason it's called "my".

        I did not read the OP - I was just picking up on your statement.

[reply]

In Section Seekers of Perl Wisdom