まぁ、散々皆さんやってらっしゃるんじゃないかと思いますが、 #!/usr/bin/perl use strict; use warnings; use Perl6::Say; use URI::Template; my $video_uri = shift @ARGV; exit unless ($video_uri); my $video_uri_tmpl = URI::Template->new('http://…