Mercurial > ec-dotfiles

comparison bin/ren @ 120:6d5ee629cd0b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
More rules!
author Edho Prima Arief <edho@myconan.net>
date Mon, 24 Oct 2011 10:56:02 +0700
parents 6a7305364793
children 0c3b473b9af7
comparison
equal deleted inserted replaced
119:6a7305364793 120:6d5ee629cd0b
11 my $newname = $_; 11 my $newname = $_;
12 #START HERE 12 #START HERE
13 $newname =~ s/_/ /g; 13 $newname =~ s/_/ /g;
14 # GROUP NAMES 14 # GROUP NAMES
15 $newname =~ s/\[UTW Mazui\]/[UTW-Mazui]/i; 15 $newname =~ s/\[UTW Mazui\]/[UTW-Mazui]/i;
16 $newname =~ s/\[t-n\]/[T-N]/i;
16 #TITLE AND NAMES 17 #TITLE AND NAMES
17 $newname =~ s/^(\(|\[)W B(\)|\])/[W_B]/; 18 $newname =~ s/^(\(|\[)W B(\)|\])/[W_B]/;
18 if ($newname =~ m/\[Doremi/) { 19 if ($newname =~ m/\[Doremi/) {
19 $newname =~ s/\.([a-z0-9]+)$/,$1/i; 20 $newname =~ s/\.([a-z0-9]+)$/,$1/i;
20 $newname =~ s/\./ /g; 21 $newname =~ s/\./ /g;
39 $newname =~ s/\] Shakugan no Shana III /] Shakugan no Shana Final /i; 40 $newname =~ s/\] Shakugan no Shana III /] Shakugan no Shana Final /i;
40 $newname =~ s/\] Boku Ha Tomodachi Ga Sukunai - /] Boku wa Tomodachi ga Sukunai - /i; 41 $newname =~ s/\] Boku Ha Tomodachi Ga Sukunai - /] Boku wa Tomodachi ga Sukunai - /i;
41 $newname =~ s/\] Seikon no Qwaser II BD - (\d+) \[720p\]/] Seikon no Qwaser II - $1 [720p BD]/i; 42 $newname =~ s/\] Seikon no Qwaser II BD - (\d+) \[720p\]/] Seikon no Qwaser II - $1 [720p BD]/i;
42 $newname =~ s/\] Seikon no Qwaser Picture Drama - (\d+) /] Seikon no Qwaser - Picture Drama $1 /i; 43 $newname =~ s/\] Seikon no Qwaser Picture Drama - (\d+) /] Seikon no Qwaser - Picture Drama $1 /i;
43 $newname =~ s/\] Fortune Arterial Akai Yakusoku - /] Fortune Arterial - /; 44 $newname =~ s/\] Fortune Arterial Akai Yakusoku - /] Fortune Arterial - /;
45 $newname =~ s/\[HorribleSubs\] Hunter X Hunter - /[HorribleSubs] Hunter x Hunter (2011) - /i;
44 $newname =~ s/\] Ookami to Koushinryou - /] Spice and Wolf - /; 46 $newname =~ s/\] Ookami to Koushinryou - /] Spice and Wolf - /;
47 $newname =~ s/\] Kamen Rider Blade /] Kamen Rider Blade /i;
45 $newname =~ s/\] Mobile Suit Gundam AGE - /] Gundam AGE - /i; 48 $newname =~ s/\] Mobile Suit Gundam AGE - /] Gundam AGE - /i;
46 $newname =~ s/\] Soredemo Machi wa Mawatte Iru - /] Soredemo Machi wa Mawatteiru - /; 49 $newname =~ s/\] Soredemo Machi wa Mawatte Iru - /] Soredemo Machi wa Mawatteiru - /;
47 $newname =~ s/\] Spiral - (\d+) .* \[640 x 480\]\[H\.264\]/] Spiral - $1 /; 50 $newname =~ s/\] Spiral - (\d+) .* \[640 x 480\]\[H\.264\]/] Spiral - $1 /;
48 $newname =~ s/\] Mayo Chiki - / ] Mayo Chiki! - /i; 51 $newname =~ s/\] Mayo Chiki - / ] Mayo Chiki! - /i;
49 $newname =~ s/\] Naruto Shippuden - /] Naruto Shippuuden - /i; 52 $newname =~ s/\] Naruto Shippuden - /] Naruto Shippuuden - /i;