Hi, dont forget the 1; at the end of the require "file"; where file is:

#!/usr/bin/perl
sub one{
print "one";
}
1;
[download]

otherwise the compiler wont be happy;-)