#!/usr/bin/perl -p

s/this/that/; # substitutes this with that
s/one/two/;   # substitutes one with two