#!/usr/bin/perl -w #### #!c:\Perl\bin\perl.exe -w