taiyoh · August 29, 2015 13:58
diff --git a/record_radiko.pl b/record_radiko.pl
 #!/usr/bin/env perl

 use strict;
 use warnings;
 use utf8;

 use FindBin::libs;
 use Radiko;
 my $radiko = Radiko->new(
    channel => 'INT', # see http://www.dcc-jpl.com/foltia/wiki/radikomemo
 );

 $radiko->record({
    minutes => 60,
    output  => '/tmp/foo.mp4'
 });
	#!/usr/bin/env perl

	use strict;
	use warnings;
	use utf8;

	use FindBin::libs;
	use Radiko;
	my $radiko = Radiko->new(
	channel => 'INT', # see http://www.dcc-jpl.com/foltia/wiki/radikomemo
	);

	$radiko->record({
	minutes => 60,
	output => '/tmp/foo.mp4'
	});