#! perl -w use strict; # your code goes here ...