Help for this page

Select Code to Download

Select or download this

my @renames;
...
...
for (@renames) {
   move $$_[0], $$_[1];
}