maxaf

rtsp://a1352.l1857053128.c18570.g.lq.akamaistream.net/D/1352/18570/v0001/reflector:53128

maxaf

#!/usr/bin/perl
# -*- cperl -*-

use strict;
use HTTP::Proxy qw/:log/;
use Time::HiRes qw/time/;
use HTTP::Proxy::BodyFilter::save;
use File::Path qw/mkpath/;

my $dir = shift @ARGV || die "usage: $0 /path/to/music/dump";