$ perl -i.bak -ne 'print unless /(?:Module1|Module2)/' Snapshot.pm