Mercurial > ec-dotfiles

comparison bin/ren @ 348:477443d4e357

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[bin/ren] Even more rules.
author Edho Arief <edho@myconan.net>
date Mon, 16 Apr 2012 20:03:13 +0700
parents 31da7601cace
children 2aa08f309ada
comparison
equal deleted inserted replaced
347:0aef806944c8 348:477443d4e357
26 $newname =~ s/^Genesis of Aquarion - (\d+) \[3xR\]\[Blu-ray.720p.H264.FLAC.AC3\](v2|)/[3xR] Genesis of Aquarion - $1 [$2 720p BD]/; 26 $newname =~ s/^Genesis of Aquarion - (\d+) \[3xR\]\[Blu-ray.720p.H264.FLAC.AC3\](v2|)/[3xR] Genesis of Aquarion - $1 [$2 720p BD]/;
27 $newname =~ s/^Otogi Zoshi Act\.(\d+)\[x264 AAC\]\[SSP-Corp\]/[SSP-Corp] Otogi Zoshi - $1 /; 27 $newname =~ s/^Otogi Zoshi Act\.(\d+)\[x264 AAC\]\[SSP-Corp\]/[SSP-Corp] Otogi Zoshi - $1 /;
28 $newname =~ s/(Ending) (\(Clean\)) - 0(\d+)/$1 $3 $2/; 28 $newname =~ s/(Ending) (\(Clean\)) - 0(\d+)/$1 $3 $2/;
29 $newname =~ s/(Opening) (\(Clean\))0(\d+)/$1 $3 $2/; 29 $newname =~ s/(Opening) (\(Clean\))0(\d+)/$1 $3 $2/;
30 $newname =~ s/ A\+Channel / A Channel - Special /; 30 $newname =~ s/ A\+Channel / A Channel - Special /;
31 $newname =~ s/\[commie\]/[Commie]/i;
31 $newname =~ s/Onii-chan no Koto Nanka Zenzen Suki Janain Dakara ne!! - (\d+) \[Uncut\]/Onii-chan no Koto Nanka Zenzen Suki Janain Dakara ne!! - $1 /; 32 $newname =~ s/Onii-chan no Koto Nanka Zenzen Suki Janain Dakara ne!! - (\d+) \[Uncut\]/Onii-chan no Koto Nanka Zenzen Suki Janain Dakara ne!! - $1 /;
32 $newname =~ s/^(Ayashi no Ceres|Chikyuu Shoujo Arjuna|Futari wa Precure Splash Star) - (\d+)\[\d+\] - .*(\[DVD\])(\[[^]]+\])(\[[a-f0-9]{8}\]\.[^.]+)$/$4 $1 - $2 $3$5/i; 33 $newname =~ s/^(Ayashi no Ceres|Chikyuu Shoujo Arjuna|Futari wa Precure Splash Star) - (\d+)\[\d+\] - .*(\[DVD\])(\[[^]]+\])(\[[a-f0-9]{8}\]\.[^.]+)$/$4 $1 - $2 $3$5/i;
33 $newname =~ s/^(Futari wa Precure Splash Star) - (C\d+)\[\d+\] - .*(\[DVD\])(\[[^]]+\])(\[[a-f0-9]{8}\]\.[^.]+)$/$4 $1 - $2 $3$5/i; 34 $newname =~ s/^(Futari wa Precure Splash Star) - (C\d+)\[\d+\] - .*(\[DVD\])(\[[^]]+\])(\[[a-f0-9]{8}\]\.[^.]+)$/$4 $1 - $2 $3$5/i;
34 $newname =~ s/^(Air Master|Black Jack Special|Cinderella Boy|Damekko Doubutsu|Crystal Blaze) - (\d+)\[\d+\] - .*(\[[^]]+\])(\[[a-f0-9]{8}\]\.[^.]+)$/$3 $1 - $2 $4/i; 35 $newname =~ s/^(Air Master|Black Jack Special|Cinderella Boy|Damekko Doubutsu|Crystal Blaze) - (\d+)\[\d+\] - .*(\[[^]]+\])(\[[a-f0-9]{8}\]\.[^.]+)$/$3 $1 - $2 $4/i;
35 $newname =~ s/^cor\.extras\.infinite\.ryvius\.textless\.opening(\d+)\./[cor] Infinite Ryvius - Opening $1 (Clean) /; 36 $newname =~ s/^cor\.extras\.infinite\.ryvius\.textless\.opening(\d+)\./[cor] Infinite Ryvius - Opening $1 (Clean) /;
61 $newname =~ s/\] Ookami to Koushinryou - /] Spice and Wolf - /; 62 $newname =~ s/\] Ookami to Koushinryou - /] Spice and Wolf - /;
62 $newname =~ s/\] Saint Seiya The Lost Canvas - /] Saint Seiya - The Lost Canvas - /; 63 $newname =~ s/\] Saint Seiya The Lost Canvas - /] Saint Seiya - The Lost Canvas - /;
63 $newname =~ s/\] Love GetChu - /] Love Get Chu - /i; 64 $newname =~ s/\] Love GetChu - /] Love Get Chu - /i;
64 $newname =~ s/\] Kamen Rider Blade /] Kamen Rider Blade /i; 65 $newname =~ s/\] Kamen Rider Blade /] Kamen Rider Blade /i;
65 $newname =~ s/\] Mobile Suit Gundam AGE - /] Gundam AGE - /i; 66 $newname =~ s/\] Mobile Suit Gundam AGE - /] Gundam AGE - /i;
67 $newname =~ s/\] Kore wa Zombie Desu ka？ of the Dead - /] Kore wa Zombie desu ka - of the Dead - /i;
68 $newname =~ s/\] Kore wa Zombie Desu ka- of the Dead - /] Kore wa Zombie desu ka - of the Dead - /i;
66 $newname =~ s/\] Soredemo Machi wa Mawatte Iru - /] Soredemo Machi wa Mawatteiru - /; 69 $newname =~ s/\] Soredemo Machi wa Mawatte Iru - /] Soredemo Machi wa Mawatteiru - /;
67 $newname =~ s/\] Spiral - (\d+) .* \[640 x 480\]\[H\.264\]/] Spiral - $1 /; 70 $newname =~ s/\] Spiral - (\d+) .* \[640 x 480\]\[H\.264\]/] Spiral - $1 /;
68 $newname =~ s/\] Mayo Chiki - /] Mayo Chiki! - /i; 71 $newname =~ s/\] Mayo Chiki - /] Mayo Chiki! - /i;
69 $newname =~ s/\] Kaitou Tenshi Twin Angel Kyun Kyun Tokimeki Paradise - /] Twin Angel - Twinkle Paradise - /i; 72 $newname =~ s/\] Kaitou Tenshi Twin Angel Kyun Kyun Tokimeki Paradise - /] Twin Angel - Twinkle Paradise - /i;
70 $newname =~ s/\] Mai Hime - /] My-HiME - /i; 73 $newname =~ s/\] Mai Hime - /] My-HiME - /i;
502 $newname =~ s/^ +//; 505 $newname =~ s/^ +//;
503 $newname =~ s/ *(\.[^ ]+$)/$1/; 506 $newname =~ s/ *(\.[^ ]+$)/$1/;
504 $newname =~ s/(- )+/- /; 507 $newname =~ s/(- )+/- /;
505 $newname =~ s/^\[N - F\]/[N-F]/; 508 $newname =~ s/^\[N - F\]/[N-F]/;
506 $newname =~ s/^\[K-F & AKUPX\]/[K-F AKUPX]/; 509 $newname =~ s/^\[K-F & AKUPX\]/[K-F AKUPX]/;
507 $newname =~ s/^\[([&!\.\s\w\- ]+)\] (Air Master|Crystal Blaze|Fairy Tail|Yawara|Ultraviolet Code 044|Gintama|Prince of Tennis|Lupin III S2|Kyou Kara Maou|Bleach|Naruto|One Piece|Detective Conan) - (Ending \d+|Opening \d+|Special \d+|\d+|\d+-\d+) /$2 - $3 [$1]/; 510 $newname =~ s/^\[([&!\.\s\w\- ]+)\] (Love Get Chu|Air Master|Crystal Blaze|Fairy Tail|Yawara|Ultraviolet Code 044|Gintama|Prince of Tennis|Lupin III S2|Kyou Kara Maou|Bleach|Naruto|One Piece|Detective Conan) - (Ending \d+|Opening \d+|Special \d+|\d+|\d+-\d+) /$2 - $3 [$1]/;
508 $newname =~ s/^Naruto - (\d{2}) /Naruto - 0$1 /; 511 $newname =~ s/^Naruto - (\d{2}) /Naruto - 0$1 /;
509 $newname =~ s/^Fairy Tail - (\d{2}) /Fairy Tail - 0$1 /; 512 $newname =~ s/^Fairy Tail - (\d{2}) /Fairy Tail - 0$1 /;
510 $newname =~ s/^Naruto - (\d{2})-(\d{2}) /Naruto - 0$1-0$2 /; 513 $newname =~ s/^Naruto - (\d{2})-(\d{2}) /Naruto - 0$1-0$2 /;
511 $newname =~ s/\[(v\d+)\]\[(DVD)\]/[$1 $2]/i; 514 $newname =~ s/\[(v\d+)\]\[(DVD)\]/[$1 $2]/i;
512 if ($^O eq "MSWin32") { $newname =~ s/ *\\ */\\/g; } 515 if ($^O eq "MSWin32") { $newname =~ s/ *\\ */\\/g; }