use subs 'system';

*main::system = sub { 0 };