1
0
mirror of https://github.com/dcarrillo/prezto.git synced 2024-11-14 16:31:12 +00:00
prezto/plugins/perl/functions/pgs
2012-01-23 20:41:04 -05:00

13 lines
215 B
Plaintext

# Perl Global Substitution
if (( $# < 2 )); then
print "usage: $0 find replace [file ...]" >&2
return 1
fi
local find="$1"
local replace="$2"
repeat 2 shift
perl -i.orig -pe 's/'"$find"'/'"$replace"'/g' "$@"