#!/usr/bin/perl

sub test {
print "test\n";
}
1;