#!/usr/bin/perl -pi
$_ =~ s/sometext/someothertext/mg;