local ( $^I, @ARGV ) = ( '.bak', $file );