sub startup { use CGI qw/:standard/; #notice how theres no 'my' next to INPUT, so it can be global for the user.pl to use $INPUT = new CGI; use strict; }