http://www.perlmonks.org?node_id=1016806


in reply to Re^4: help with error 'readline() on unopened filehandle'
in thread help with error 'readline() on unopened filehandle'

Different guy here, see Tutorials: Basic debugging checklist , run your code to B::Deparse, then use or instead of || , it is a classic precedence pitfall, see || die or or die :), "or die" versus "|| die"