#!/usr/local/bin/perl
use strict;      #get used to this
use warnings;    #and maybe this one too