use CGI qw/sub1 :standard/;


##</code><code>##

{
    local *CGI::sub1 = \&sub1;
    # do some CGI things
}