On 9/14/2012 2:28 PM, David F. Skoll wrote:
$offset = -1 unless defined($offset);
>No: Possibly deprecated construct under perl 5.14.
Anyone running Perl 5.14 want to confirm this?
Perl 5.14.2 runs this program without issue:
#!/usr/local/perl-5.14/bin/perl
use strict;
my $offset;
$offset = undef;
$offset = -1 unless defined($offset);
print "$offset\n";
$offset = 1;
$offset = -1 unless defined($offset);
print "$offset\n";
Output:
perl /tmp/test.pl
-1
1
Doesn't look like an issue to me.
Regards,
KAM
_______________________________________________
NOTE: If there is a disclaimer or other legal boilerplate in the above
message, it is NULL AND VOID. You may ignore it.
Visit http://www.mimedefang.org and http://www.roaringpenguin.com
MIMEDefang mailing list [email protected]
http://lists.roaringpenguin.com/mailman/listinfo/mimedefang
