#!/usr/local/bin/perl -l

$//test = 1;