#! /strawberry/Perl/bin/perl