change // to || so I don't have to require perl 5.010