#!/usr/bin/perl 0 or print "0:false\n"; 1 or print "1:false\n"; 0 or die "Error\n"; print"Not executed";