local *IO::File::open = sub {.....}