in reply to remove a specific character occuring in file using script

If you don't care about escaped " chars:

perl -pi -e 's/source "(.+?)"/source $1/g'

If you do:

perl -pi -e 's/source "([^"\\]*(?:\\.[^"\\]*)*)"/source $1/g'