Mercurial > ec-dotfiles

comparison bin/ren @ 297:4c941687b76b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge.
author Edho Arief <edho@myconan.net>
date Thu, 09 Feb 2012 08:29:49 +0700
parents 0f46455257be
children ce17ed77a7fa
comparison
equal deleted inserted replaced
296:7251d4f5e5c9 297:4c941687b76b
19 if ($newname =~ m/\[(Doremi|Elysium)/) { 19 if ($newname =~ m/\[(Doremi|Elysium)/) {
20 $newname =~ s/\.([a-z0-9]+)$/,$1/i; 20 $newname =~ s/\.([a-z0-9]+)$/,$1/i;
21 $newname =~ s/\./ /g; 21 $newname =~ s/\./ /g;
22 $newname =~ s/,([a-z0-9]+)$/.$1/i; 22 $newname =~ s/,([a-z0-9]+)$/.$1/i;
23 } 23 }
24 $newname =~ s/^Gundam Seed (\d+|\d+\[v2\])\.DVD\(H264\.AAC\)\[KAA\]/[KAA] Gundam SEED - $1 [DVD]/i;
24 $newname =~ s/(\[ACX\])(Spiral)( - \d+) - .* (\[[a-f0-9]{8}\]\.mkv)$/$1 $2$3 $4/i; 25 $newname =~ s/(\[ACX\])(Spiral)( - \d+) - .* (\[[a-f0-9]{8}\]\.mkv)$/$1 $2$3 $4/i;
25 $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]/;
26 $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 /;
27 $newname =~ s/(Ending) (\(Clean\)) - 0(\d+)/$1 $3 $2/; 28 $newname =~ s/(Ending) (\(Clean\)) - 0(\d+)/$1 $3 $2/;
28 $newname =~ s/(Opening) (\(Clean\))0(\d+)/$1 $3 $2/; 29 $newname =~ s/(Opening) (\(Clean\))0(\d+)/$1 $3 $2/;
42 $newname =~ s/ (Ryvius Illusion \d+) - introduction / $1 - Introduction /; 43 $newname =~ s/ (Ryvius Illusion \d+) - introduction / $1 - Introduction /;
43 $newname =~ s/^Arigatou\.Tokyo\.Majin\.Ep(\d+)\./[Arigatou] Tokyo Majin - $1 /; 44 $newname =~ s/^Arigatou\.Tokyo\.Majin\.Ep(\d+)\./[Arigatou] Tokyo Majin - $1 /;
44 $newname =~ s/ (Inazuma Eleven - )(\d{2}) / $1 0$2 /; 45 $newname =~ s/ (Inazuma Eleven - )(\d{2}) / $1 0$2 /;
45 $newname =~ s/\] *Pocket Monsters - (\d+) - .*\[(H264 |)SUB\]/] Pokemon - $1 /i; 46 $newname =~ s/\] *Pocket Monsters - (\d+) - .*\[(H264 |)SUB\]/] Pokemon - $1 /i;
46 $newname =~ s/\] Fafner - /] Soukyuu no Fafner - /; 47 $newname =~ s/\] Fafner - /] Soukyuu no Fafner - /;
48 $newname =~ s/\] Inu × Boku SS - /] Inu x Boku SS - /i;
49 $newname =~ s/\] Inu x Boku Secret Service - /] Inu x Boku SS - /i;
47 $newname =~ s/\] Mashiro iro symphony - /] Mashiro-iro Symphony - /i; 50 $newname =~ s/\] Mashiro iro symphony - /] Mashiro-iro Symphony - /i;
48 $newname =~ s/\] To Aru Kagaku no Railgun /] Toaru Kagaku no Railgun /i; 51 $newname =~ s/\] To Aru Kagaku no Railgun /] Toaru Kagaku no Railgun /i;
49 $newname =~ s/\] To Aru Majutsu no Index /] Toaru Majutsu no Index /i; 52 $newname =~ s/\] To Aru Majutsu no Index /] Toaru Majutsu no Index /i;
50 $newname =~ s/\] Shakugan no Shana III /] Shakugan no Shana Final /i; 53 $newname =~ s/\] Shakugan no Shana III /] Shakugan no Shana Final /i;
51 $newname =~ s/\] Boku Ha Tomodachi Ga Sukunai - /] Boku wa Tomodachi ga Sukunai - /i; 54 $newname =~ s/\] Boku Ha Tomodachi Ga Sukunai - /] Boku wa Tomodachi ga Sukunai - /i;
52 $newname =~ s/\] Seikon no Qwaser II BD - (\d+) \[720p\]/] Seikon no Qwaser II - $1 [720p BD]/i; 55 $newname =~ s/\] Seikon no Qwaser II BD - (\d+) \[720p\]/] Seikon no Qwaser II - $1 [720p BD]/i;
53 $newname =~ s/\] Seikon no Qwaser Picture Drama - (\d+) /] Seikon no Qwaser - Picture Drama $1 /i; 56 $newname =~ s/\] Seikon no Qwaser Picture Drama - (\d+) /] Seikon no Qwaser - Picture Drama $1 /i;
54 $newname =~ s/\] Fortune Arterial Akai Yakusoku - /] Fortune Arterial - /; 57 $newname =~ s/\] Fortune Arterial Akai Yakusoku - /] Fortune Arterial - /;
58 $newname =~ s/\] Full Metal Panic Fumoffu - /] Full Metal Panic Fumoffu - /i;
55 $newname =~ s/\[HorribleSubs\] Hunter X Hunter - /[HorribleSubs] Hunter x Hunter (2011) - /i; 59 $newname =~ s/\[HorribleSubs\] Hunter X Hunter - /[HorribleSubs] Hunter x Hunter (2011) - /i;
56 $newname =~ s/\] Ookami to Koushinryou - /] Spice and Wolf - /; 60 $newname =~ s/\] Ookami to Koushinryou - /] Spice and Wolf - /;
61 $newname =~ s/\] Saint Seiya The Lost Canvas - /] Saint Seiya - The Lost Canvas - /;
62 $newname =~ s/\] Love GetChu - /] Love Get Chu - /i;
57 $newname =~ s/\] Kamen Rider Blade /] Kamen Rider Blade /i; 63 $newname =~ s/\] Kamen Rider Blade /] Kamen Rider Blade /i;
58 $newname =~ s/\] Mobile Suit Gundam AGE - /] Gundam AGE - /i; 64 $newname =~ s/\] Mobile Suit Gundam AGE - /] Gundam AGE - /i;
59 $newname =~ s/\] Soredemo Machi wa Mawatte Iru - /] Soredemo Machi wa Mawatteiru - /; 65 $newname =~ s/\] Soredemo Machi wa Mawatte Iru - /] Soredemo Machi wa Mawatteiru - /;
60 $newname =~ s/\] Spiral - (\d+) .* \[640 x 480\]\[H\.264\]/] Spiral - $1 /; 66 $newname =~ s/\] Spiral - (\d+) .* \[640 x 480\]\[H\.264\]/] Spiral - $1 /;
61 $newname =~ s/\] Mayo Chiki - / ] Mayo Chiki! - /i; 67 $newname =~ s/\] Mayo Chiki - /] Mayo Chiki! - /i;
68 $newname =~ s/\] Mai Hime - /] My-HiME - /i;
62 $newname =~ s/\] Naruto Shippuden - /] Naruto Shippuuden - /i; 69 $newname =~ s/\] Naruto Shippuden - /] Naruto Shippuuden - /i;
63 $newname =~ s/\] Maji de Watashi ni Koi Shinasai!! /] Maji de Watashi ni Koi Shinasai! /i; 70 $newname =~ s/\] Maji de Watashi ni Koi Shinasai!! /] Maji de Watashi ni Koi Shinasai! /i;
64 $newname =~ s/\] Sei Juushi Bismarck /] Sei Juushi Bismark /i; 71 $newname =~ s/\] Sei Juushi Bismarck /] Sei Juushi Bismark /i;
65 $newname =~ s/\] Tamayura - hitotose - /] Tamayura ~hitotose~ - /i; 72 $newname =~ s/\] Tamayura - hitotose - /] Tamayura ~hitotose~ - /i;
66 $newname =~ s/\] Yumekui Merry /] Dream Eater Merry /i; 73 $newname =~ s/\] Yumekui Merry /] Dream Eater Merry /i;
74 $newname =~ s/\] Zero no Tsukaima Final /] Zero no Tsukaima F /i;
75 $newname =~ s/\] Papa no Iukoto wo Kikinasai! /] Papa no Iu Koto wo Kikinasai! /i;
76 $newname =~ s/\] Black★Rock Shooter /] Black Rock Shooter /i;
77 $newname =~ s/\] Mobile Suit Gundam SEED HD Remaster /] Gundam SEED (Remaster) /i;
78 $newname =~ s/\] *rockman exe axess /] Rockman.EXE Axess /i;
67 $newname =~ s/^Arigatou\.Tsubasa\.Chronicles\.(|2\.)(\d{2})(|v2)\./[Arigatou] Tsubasa Chronicles $1 - $2$3/; 79 $newname =~ s/^Arigatou\.Tsubasa\.Chronicles\.(|2\.)(\d{2})(|v2)\./[Arigatou] Tsubasa Chronicles $1 - $2$3/;
68 $newname =~ s/^Niea\.Under\.Seven\.(\d+)\.\(Dual\.Audio\)\.XVID\.\[AM\]/[AM] Niea Under Seven - $1/; 80 $newname =~ s/^Niea\.Under\.Seven\.(\d+)\.\(Dual\.Audio\)\.XVID\.\[AM\]/[AM] Niea Under Seven - $1/;
69 $newname =~ s/ Tsubasa Chronicles 2\. - / Tsubasa Chronicles 2 /; 81 $newname =~ s/ Tsubasa Chronicles 2\. - / Tsubasa Chronicles 2 /;
70 $newname =~ s/ *Moritasan wa Mukuchi */ Morita-san wa Mukuchi /i; 82 $newname =~ s/ *Moritasan wa Mukuchi */ Morita-san wa Mukuchi /i;
71 $newname =~ s/ Hanasakeru Seishonen / Hanasakeru Seishounen /i; 83 $newname =~ s/ Hanasakeru Seishonen / Hanasakeru Seishounen /i;
151 $newname =~ s/ Maria( |†)Holic / Maria+Holic /i; 163 $newname =~ s/ Maria( |†)Holic / Maria+Holic /i;
152 $newname =~ s/ C³ / C3 - Cube x Cursed x Curious /i; 164 $newname =~ s/ C³ / C3 - Cube x Cursed x Curious /i;
153 $newname =~ s/ C3 Cube x Cursed x Curious / C3 - Cube x Cursed x Curious /i; 165 $newname =~ s/ C3 Cube x Cursed x Curious / C3 - Cube x Cursed x Curious /i;
154 $newname =~ s/ Fate( ⁄ | )Zero / Fate-Zero /i; 166 $newname =~ s/ Fate( ⁄ | )Zero / Fate-Zero /i;
155 $newname =~ s/ Pollyanna Episode / Pollyanna /; 167 $newname =~ s/ Pollyanna Episode / Pollyanna /;
168 $newname =~ s/ Ef - A Fairy Tale of the Two / ef - A Fairy Tale of the Two /i;
169 $newname =~ s/ Ef - A Fairy Tale of the Two-/ ef - A Fairy Tale of the Two -/i;
156 $newname =~ s/^Legend of Galactic Heroes - (\d+) \(([A-F0-9]{8})\) \[Central Anime\]/[Central Anime] Legend of Galactic Heroes - $1 [$2]/; 170 $newname =~ s/^Legend of Galactic Heroes - (\d+) \(([A-F0-9]{8})\) \[Central Anime\]/[Central Anime] Legend of Galactic Heroes - $1 [$2]/;
157 $newname =~ s/\[Hnk\]/[HnK]/; 171 $newname =~ s/\[Hnk\]/[HnK]/;
158 $newname =~ s/^Inuyasha - (\d+|\d+-\d+)\[167\] - .*(\[DVD\]\[AHQ\])/Inuyasha - $1 $2/; 172 $newname =~ s/^Inuyasha - (\d+|\d+-\d+)\[167\] - .*(\[DVD\]\[AHQ\])/Inuyasha - $1 $2/;
159 $newname =~ s/^Saint Seiya Hades OVA - (\d+) \[(AonE-SpA|SpA)\]/[$2] Saint Seiya Hades OVA - $1/; 173 $newname =~ s/^Saint Seiya Hades OVA - (\d+) \[(AonE-SpA|SpA)\]/[$2] Saint Seiya Hades OVA - $1/;
160 $newname =~ s/\[\d+\] Saint Seiya Hades OVA - (\d+)/[SpA] Saint Seiya Hades OVA - $1/; 174 $newname =~ s/\[\d+\] Saint Seiya Hades OVA - (\d+)/[SpA] Saint Seiya Hades OVA - $1/;
269 $newname =~ s/ OP(\d+[a-z]*)/ - Opening $1 /i; 283 $newname =~ s/ OP(\d+[a-z]*)/ - Opening $1 /i;
270 $newname =~ s/ ED / - Ending /; 284 $newname =~ s/ ED / - Ending /;
271 $newname =~ s/ Clean (Opening|Ending) v2/ - $1 (Clean) [v2]/i; 285 $newname =~ s/ Clean (Opening|Ending) v2/ - $1 (Clean) [v2]/i;
272 $newname =~ s/ Creditless (Opening|Ending) (\d+) / - $1 $2 (Clean) /i; 286 $newname =~ s/ Creditless (Opening|Ending) (\d+) / - $1 $2 (Clean) /i;
273 $newname =~ s/ Ep(\d+) Creditless Ending / - Ending $1 (Clean) /i; 287 $newname =~ s/ Ep(\d+) Creditless Ending / - Ending $1 (Clean) /i;
274 $newname =~ s/ (NCED|Ending Clean) / - Ending (Clean) /i; 288 $newname =~ s/ (NC-?ED|Ending Clean) / - Ending (Clean) /i;
275 $newname =~ s/ NCED(\d+) / - Ending $1 (Clean) /i; 289 $newname =~ s/ NC-?ED(\d+) / - Ending $1 (Clean) /i;
276 $newname =~ s/ (NCOP|Opening Clean) / - Opening (Clean)/i; 290 $newname =~ s/ (NC-?OP|Opening Clean) / - Opening (Clean)/i;
291 $newname =~ s/ NC-?OP(\d+) / - Opening $1 (Clean) /i;
277 $newname =~ s/ OP / - Opening /; 292 $newname =~ s/ OP / - Opening /;
278 $newname =~ s/ (\d+-\d+) / - $1 /; 293 $newname =~ s/ (\d+-\d+) / - $1 /;
279 $newname =~ s/ - - / - /g; 294 $newname =~ s/ - - / - /g;
280 $newname =~ s/ Ep / /ig; 295 $newname =~ s/ Ep / /ig;
281 ##SLICED BREAD 296 ##SLICED BREAD
297 #v2
282 $newname =~ s/(\(|\[) *(10bit-v2) *(\)|\])/[v2]/i; 298 $newname =~ s/(\(|\[) *(10bit-v2) *(\)|\])/[v2]/i;
283 $newname =~ s/(\(|\[) *(h\.264-Hi10P|720x480|10-?bit|10bit 480p H264|640x360|640x360 H264 AAC|h264\.aac|hi10p|10bit|\d+th Release|x264\.aac|xvid|divx5\.2\.1|divx5\.1|divx5\.05|divx5\.1\.1|h\.?264 AC3|848x480|H264 848x480|h264-480p AAC|h\.264-480p) *(\)|\])//i; 299 #dvd v2
284 $newname =~ s/\[(DVD 10bit)\]/[DVD]/i; 300 $newname =~ s/ \[DVD\] v2/ [v2 DVD]/i;
285 $newname =~ s/(\(|\[) *(DVD H264 640x480|DVD H264 720x480 AAC|DVD 704x480 H264 AC3|DVD 704x480|DVDRip\.Xvid\.864x480\.Vorbis|DVD H264 848x480|DVD 720x480|DVD H264 720x480|DVD, wmv, mp3) *(\)|\])/[DVD]/i; 301 #nothing
286 $newname =~ s/(\(|\[) *(BD\]\[1080p-FLAC|BD 1080|1920x1080 Hi10p h264 AAC|BD 1920x1080 x264 AAC|BD 1080p Hi10P|BDRip 1080p x264 FLAC|BD-1080p-|BD-1080p-FLAC|1920x1038 Blu-Ray FLAC|1920x1080 Blu-Ray FLAC|1920x1080 h264 BD FLAC|1920x1080 BD|BD\.1080p\.FLAC|BD 1080p H\.264 AAC 5\.1|BD 1080p) *(\)|\])/[1080p BD]/i; 302 $newname =~ s/(\(|\[) *(H264 704x400|640x480 DivX511 120fps mp3|640x480 DivX511 mp3|h\.264-Hi10P|720x480|10-?bit|10bit 480p H264|640x360|640x360 H264 AAC|h264\.aac|hi10p|10bit|\d+th Release|x264\.aac|xvid|divx5\.2\.1|divx5\.1|divx5\.05|divx5\.1\.1|h\.?264 AC3|848x480|H264 848x480|h264-480p AAC|h\.264-480p) *(\)|\])//i;
287 $newname =~ s/(\(|\[) *(Hi10P 1280x720 H264|Hi10P 1280x720|1280x720 Hi10P|1280x720 5\.1|1280x720 x264 AAC|1280x720 H264 AAC|720p H264 AAC|1280x720|1280x720 H\.?264 AAC) *(\)|\])/[720p]/i; 303 #dvd
288 $newname =~ s/(\(|\[) *(BD, 720, 10bit, AAC|BDrip 720p Vorbis|BD 720p Hi10P AAC|BD, 720p,|BD 720p H264-AAC|BDRip 720p|BD, 720p, ,|1280x720 BD|BD 1280x720 H264 AAC|BD 720p|BD 720p FLAC|BD 1280x720 H264 AAC) *(\)|\])/[720p BD]/i; 304 $newname =~ s/(\(|\[) *(DVD x264 10-bit AC3|DVD 10bit) *(\)|\])/[DVD]/i;
289 $newname =~ s/(\(|\[) *(BD 540p) *(\)|\])/[BD]/i; 305 #dvd again
306 $newname =~ s/(\(|\[) *(R2 DVD\.H264\.AC3|DVD H264 720x480|DVD 720x480 x264 FLAC|R1DVD 720x480 x264 AC-3|DVD 712x480 AC-3|DVD 720x480 AC-3|R\d DVD\.H264\.AC3|DVD 1024x576 x264 FLAC|DVD H264 640x480|DVD H264 720x480 AAC|DVD 704x480 H264 AC3|DVD 704x480|DVDRip\.Xvid\.864x480\.Vorbis|DVD H264 848x480|DVD 720x480|DVD H264 720x480|DVD, wmv, mp3) *(\)|\])/[DVD]/i;
307 #1080p BD
308 $newname =~ s/(\(|\[) *(BDRip 1080p x264 FLAC|BD Hi10P 1920x1080|BD Hi10P 1920x1080 H264 FLAC|BD 1920x1080 x264 Hi10P FLAC|BD 1920x1080 Hi10P|1920x1080 BD AAC|BD\]\[h264-1080p FLAC|BD-h264-10bit-1080p|BD\]\[1080p-FLAC|BD 1080|1920x1080 Hi10p h264 AAC|BD 1920x1080 x264 AAC|BD 1080p Hi10P|BDRip 1080p x264 FLAC|BD-1080p-|BD-1080p-FLAC|1920x1038 Blu-Ray FLAC|1920x1080 Blu-Ray FLAC|1920x1080 h264 BD FLAC|1920x1080 BD|BD\.1080p\.FLAC|BD 1080p H\.264 AAC 5\.1|BD 1080p) *(\)|\])/[1080p BD]/i;
309 #720p
310 $newname =~ s/(\(|\[) *(1280x720 Hi10p|1280x720 Hi10p AAC|AT-X 1280x720 H264|Hi10P 1280x720 H264|Hi10P 1280x720|1280x720 Hi10P|1280x720 5\.1|1280x720 x264 AAC|1280x720 H264 AAC|720p H264 AAC|1280x720|1280x720 H\.?264 AAC) *(\)|\])/[720p]/i;
311 #720p BD
312 $newname =~ s/(\(|\[) *(BDRip 720p|BD 720p DA|Blu-Ray 960x720 Dual Audio FLAC|BD, 720p|BD\]\[h264-720p\]\[FLAC|BD Hi10P 1280x720|BD, 720p, 10bit,|BD, 720, 10bit, AAC|BDrip 720p Vorbis|BD 720p Hi10P AAC|BD, 720p,|BD 720p H264-AAC|BDRip 720p|BD, 720p, ,|1280x720 BD|BD 1280x720 H264 AAC|BD 720p|BD 720p FLAC|BD 1280x720 H264 AAC) *(\)|\])/[720p BD]/i;
313 #BD
314 $newname =~ s/(\(|\[) *(Blu-Ray|BD 540p) *(\)|\])/[BD]/i;
315 #576p
290 $newname =~ s/(\(|\[) *(1024x576|H264 1024x576) *(\)|\])/[576p]/i; 316 $newname =~ s/(\(|\[) *(1024x576|H264 1024x576) *(\)|\])/[576p]/i;
317 #1080p
291 $newname =~ s/(\(|\[) *(1920x1080) *(\)|\])/[1080p]/i; 318 $newname =~ s/(\(|\[) *(1920x1080) *(\)|\])/[1080p]/i;
292 ##SLICED BREAD pt.2 319 ##SLICED BREAD pt.2
293 $newname =~ s/(\d+)v(\d+)/$1 [v$2]/i; 320 $newname =~ s/(\d+)v(\d+)/$1 [v$2]/i;
294 $newname =~ s/\[BD\]\[1920x1080 H264-Flac\]/[1080p BD]/i; 321 $newname =~ s/\[BD\]\[1920x1080 H264-Flac\]/[1080p BD]/i;
295 $newname =~ s/\[BD\]\[720p-AAC\]/[720p BD]/i; 322 $newname =~ s/\[BD\]\[720p-AAC\]/[720p BD]/i;
459 $newname =~ s/ Mahoujin Guruguru - 2 - Doki Doki Densetsu - / Mahoujin Guruguru 2 - Doki Doki Densetsu - /; 486 $newname =~ s/ Mahoujin Guruguru - 2 - Doki Doki Densetsu - / Mahoujin Guruguru 2 - Doki Doki Densetsu - /;
460 $newname =~ s/ The World God Only Knows - 2 - / The World God Only Knows 2 - /; 487 $newname =~ s/ The World God Only Knows - 2 - / The World God Only Knows 2 - /;
461 $newname =~ s/ Legend of Galactic Heroes Gaiden - 2 - / Legend of Galactic Heroes Gaiden 2 - /; 488 $newname =~ s/ Legend of Galactic Heroes Gaiden - 2 - / Legend of Galactic Heroes Gaiden 2 - /;
462 $newname =~ s/ Kara no Kyoukai - (\d+) / Kara no Kyoukai - Chapter $1/; 489 $newname =~ s/ Kara no Kyoukai - (\d+) / Kara no Kyoukai - Chapter $1/;
463 $newname =~ s/\[G P\]/[G_P]/i; 490 $newname =~ s/\[G P\]/[G_P]/i;
491 $newname =~ s/\[-'\]/[-__-']/;
492 $newname =~ s/\['\]/[-__-']/;
464 #SAFE CLEANUPS 493 #SAFE CLEANUPS
465 $newname =~ s/ +/ /g; 494 $newname =~ s/ +/ /g;
466 $newname =~ s/^ +//; 495 $newname =~ s/^ +//;
467 $newname =~ s/ *(\.[^ ]+$)/$1/; 496 $newname =~ s/ *(\.[^ ]+$)/$1/;
468 $newname =~ s/(- )+/- /; 497 $newname =~ s/(- )+/- /;
470 $newname =~ s/^\[K-F & AKUPX\]/[K-F AKUPX]/; 499 $newname =~ s/^\[K-F & AKUPX\]/[K-F AKUPX]/;
471 $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]/; 500 $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]/;
472 $newname =~ s/^Naruto - (\d{2}) /Naruto - 0$1 /; 501 $newname =~ s/^Naruto - (\d{2}) /Naruto - 0$1 /;
473 $newname =~ s/^Fairy Tail - (\d{2}) /Fairy Tail - 0$1 /; 502 $newname =~ s/^Fairy Tail - (\d{2}) /Fairy Tail - 0$1 /;
474 $newname =~ s/^Naruto - (\d{2})-(\d{2}) /Naruto - 0$1-0$2 /; 503 $newname =~ s/^Naruto - (\d{2})-(\d{2}) /Naruto - 0$1-0$2 /;
504 $newname =~ s/\[(v\d+)\]\[(DVD)\]/[$1 $2]/i;
475 if ($^O eq "MSWin32") { $newname =~ s/ *\\ */\\/g; } 505 if ($^O eq "MSWin32") { $newname =~ s/ *\\ */\\/g; }
476 print(qq($_: $newname already exists, skipping\n)) and next() if -e $newname and $_ ne $newname; 506 print(qq($_: $newname already exists, skipping\n)) and next() if -e $newname and $_ ne $newname;
477 if ($_ eq $newname) { 507 if ($_ eq $newname) {
478 print("$_: no need to rename, skipping\n"); 508 print("$_: no need to rename, skipping\n");
479 } else { 509 } else {