#!/usr/bin/Perl print <