Re^3: undef vs empty string '' from split

in reply to Re^2: undef vs empty string '' from split
in thread undef vs empty string '' from split

Hmm.. You mean like this:

#!perl -w
use strict;
$_ = 'event_handler=';
my ($var1, $var2) = split( /=/);
if( !defined($var2) ) {
    print "undefined\n";
}
else {
    print "'$var1' '$var2'\n";
}
[download]

output:

'event_handler' ''
[download]

that does seem to be inconsistent with the docs. And what's even more confusing is that:

#!perl -w
use strict;
$_ = 'event_handler=';
my @arr = split(/=/);
my ($var1, $var2) = @arr;
if( !defined($var2) ) {
    print "undefined\n";
}
else {
    print "'$var1' '$var2'\n";
}
[download]

output:

undefined
[download]

Confirms the docs.

updated: added output for perl 5.8.8 / linux

"What should it profit a man, if he should win a flame war, yet lose his cool?"

In Section Seekers of Perl Wisdom