#! /usr/bin/perl
return 1;

##</code><code>##

Can't return outside a subroutine at return.pl line 2