#!/usr/bin/perl -w$path = "/usr/bin";# Change /usr/bin to /usr/local/bin.$path =~ s{/usr/bin} ;print "New path: $path.\n";