my ( $crummy, $good );
	foreach my $crummy_good_ar ( @corrections_to_make ) {
		( $crummy, $good ) = @$crummy_good_ar;
		$file_in_string_form =~ s/\b(\Q$crummy\E)\b/$good/ig;
	}