Skip to content

Instantly share code, notes, and snippets.

@jrmoserbaltimore
Created February 21, 2013 21:57
Show Gist options
  • Save jrmoserbaltimore/5008650 to your computer and use it in GitHub Desktop.
Save jrmoserbaltimore/5008650 to your computer and use it in GitHub Desktop.
while (
$response_body =~ m/.*${station}full_480p.*(start|stop) recording.*/g )
{
switch ($1) {
case "start" {
$status = 0;
}
case "stop" {
$status = 1;
last;
}
}
}
if ( $status == 1 ) {
while ( $response_body =~
m/.*${station}full_480p.*(start|stop) recording.*File = .*${station}\/${station}([^_]+)_.*/g
)
{
if ( $1 eq "stop" ) {
$daypart = $2;
last;
}
}
}
daypart = re.match(
".*" + callsign + "full_480p.*(start|stop) recording.*File = .*" + callsign + "/" + callsign + "([^_]+)_.*",
r).group(2)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment