use CGI ();

# call CGI's sub1
CGI::sub1();

# your sub1
sub1();