sub File::Slurp::read_file { ... } or local *File::Slurp::read_file = sub { ... };