$print_link = $ENV{'REQUEST_URI'} ;
$print_link =~ s/frame=[\w*]&*//;