in reply to Can you explain the result?

Rather than worrying about why Perl does this, it may be simpler to just do return (1 and 0);