Changeset 1786

Show
Ignore:
Timestamp:
10/22/06 22:09:36
Author:
miyagawa
Message:

OMG wowow-liga site looks like maintained manually

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/assets/plugins/CustomFeed-Script/wowow-liga-espanola.pl

    r1752 r1786  
    4747 
    4848    # 10月15日(日)深夜2:55 WOWOW/BS-5ch/191ch  
    49     $date =~ m!^\s*(\d{1,2})月(\d{1,2})日(.*?)\s*(午前|午後|深夜)(\d{1,2}):(\d{2})\s*WOWOW.*?/(\d+ch)! 
     49    $date =~ m!^\s*(\d{1,2})月(\d{1,2})日[(\(].*?[)\)]\s*(午前|午後|深夜)(\d{1,2}):(\d{2})\s*WOWOW.*?(\d{3}[cc][hh])! 
    5050        or die "No match: $date"; 
    5151    my($month, $day, $am_pm_midnight, $hour, $minute, $channel) = ($1, $2, $3, $4, $5, $6);