[mythtv] tv.com perl script

Webmaaschter at gmx.de Webmaaschter at gmx.de
Tue Mar 14 15:43:34 UTC 2006


Your script didnt Work if the Title begins with an big S like in "Desperate 
Housewifes.SxxEyy.Silly.avi". your script tought the S of Silly is part of 
the (SxxEyy). Here my Patch:

At ~Line 250 (dont know exactly, because i changed a lot to suit my needs) 

if ( $fileNameType == 1 ) {
#Show.Name.S01E01.Episode Name.avi
<$filename =~ s/[sS]([0-9]+)[eE]([0-9]+)/S\1E\2/g; #uppercase
<my $strPos1 = rindex( $filename, ".S" );
>$filename =~ s/[sS]([0-9]+)[eE]([0-9]+)/\.S\1E\2/g; #uppercase
>my $strPos1 = rindex( $filename, "..S" );

Greets
Christoph


More information about the mythtv-dev mailing list