Help for this page

Select Code to Download


  1. or download this
    $ rename -v "\$_=lc;s/&/ and /g;y/()'/--/sd;s/(?:(\.)|(-)|[\W_])+/\$1|
+|\$2||'_'/ge"  *
  2. or download this
    $_=lc;s/&/ and /g;y/()'/--/sd;s/(?:(\.)|(-)|[\W_])+/$1||$2||'_'/ge;
  3. or download this
    my @f = (
    'Godspeed - Sunshine and Gasoline.mp3',
...
    s/(?:(\.)|(-)|[\W_])+/$1||$2||'_'/ge;
    print;
}
  4. or download this
    #!/usr/bin/env perl

...
CMDS

system('rename','-v',$cmd, @ARGV);