#!/your/perl/here -w use strict;