#!/usr/bin/perl -w

use strict;
my $var = 1;

if ($var == 1) {
   print "Hello World!\n";
}else{
   exit(0);
}