Experiment to analyze Perl's unless operator