#!/usr/bin/perl -w
   # on the first line of file (*NIX or Windows).
   # on a Unix type system, you need all but the -w anyway.
   # a Windows box will see the -w and use it.
   # I always recommend the usage of:
   # use strict;