Help for this page

Select Code to Download

Select or download this

my %insens = (
    bad => 'sad',
    Bad => 'Sad',
...
);

s/(bad)/$insens{$1}/gi;