sub do_stuff { my $one, $two, $three = @_; use CGI; }