#!/usr/bin/perl
system "cat $0";