eval "\$source =~ s/\$find/\$replace/$opt";