[mocha]

Just curious regarding the perl script you linked to. I also experience where it does not work on every ustream page. Some pages it says "no video url at xxxxx.pl line 32", I tried hacking on the source but can't get it to work. The problem has something to do with this part.

sub get_video_url {
    my $url = shift;
    my $amf_bin = get($url);

    if ($amf_bin =~ m|(rtmp://[^/]+/ustreamVideo/(\d+))|m) {
        return ($1, $2);
    }