#!/usr/bin/perl # # For the Freedom of #perl-haircut! # use strict; use warnings; print <