##################Setting category########################## if ($release_name =~ m/(Lz0|PLATO)/i) { print "[INFO] Category : Apps\n"; $category = "Apps"; #do smth } if ($release_name =~ m/(SKIDROW|POSTMORTEM|RELOADED|THETA|TiNYiSO|HI2U|TE|FLT|PROPHET|Unleashed|OUTLAWS|ALiAS|JAGUAR)/i) { print "[INFO] Category : Games\n"; $category = "Games"; #do smth } if ($release_name =~ m/(DVDRip.XviD|dvdrip.xvid|TS|CAM|R5.XviD)/i) { print "[INFO] Category : XviD\n"; $category = "XviD"; #do smth } if ($release_name =~ m/BluRay.x264/i) { print "[INFO] Category : HD x264\n"; $category = "HD x264"; #do smth } if ($release_name =~ m/DVDR/i) { print "[INFO] Category : XviD\n"; $category = "XviD"; #do smth } if ($release_name =~ m/(BRRIP.x264|BRRIP x264)/i) { print "[INFO] Category : XviD\n"; $category = "XviD"; #do smth } } if ($release_name =~ m/(BRRIP.XviD|BDRip.XviD)/i) { print "[INFO] Category : XviD\n"; $category = "XviD"; #do smth } if ($release_name =~ m/Update/i) { print "[INFO] Category : Misc\n"; $category = "MIsc"; #do smth } if ($release_name =~ m/(HDTV.XviD|HDTV.x264|PDTV.x264)/i) { print "[INFO] Category : Episodes\n"; $category = "Episodes"; #do smth } #### [INFO] Category : XviD [INFO] Category : HD x264