projects
/
cmccabe-bin
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
add svn-diff-head^ script
[cmccabe-bin]
/
renamer.pl
1
#!/usr/bin/perl
2
3
$op = shift or die $help;
4
chomp(@ARGV = <STDIN>) unless @ARGV;
5
for (@ARGV) {
6
$was = $_;
7
eval $op;
8
die $@ if $@;
9
rename($was,$_) unless $was eq $_;
10
}