#!/usr/bin/perl -w # false -- return false exit status exit 1;