use File::Basename;
my @local = map {basename $_} grep 1 > -M, </usr/local/bin/*>;
my @files = grep -e, map "/usr/bin/$_", @local;
rename $_, "$_.5.8" for @files;
symlink "/usr/local/bin/$_", "/usr/bin/$_" for @local;