sub false {
    my $f= "";
    {
        BEGIN {
            warnings->unimport()   if  $INC{"warnings.pm"};
        }
        local( $^W )= 0;
        my $temp= 0+$f;
    }
    return $f;
}