Help for this page
#! /usr/bin/perl -w ... } print "Outside the IF (3)\n";
[5.006] ... Inside the IF (3) Outside the IF (3) I'm destroyed