9 - 一般ノルウェー市民 2020/09/14(月) 19:27:26.24 ID:3mhlBTi+I
583 :一般ノルウェー市民:2020/09/14(月) 15:22:04.12 ID:Qb0XwdwE0
面白そうだけど謎のPC差別のせいで見れないわ
584 :一般ノルウェー市民:2020/09/14(月) 15:24:49.41 ID:uEKHXWHO0
F12押してデベロッパーツールでスマホ表示にすれば見れるんちゃう?
585 :一般ノルウェー市民:2020/09/14(月) 15:30:39.88 ID:mHRUJgBH0
とりとり
#!/usr/bin/perl
use strict;
use warnings;
if (@ARGV == 1) {
my $str = $ARGV[0];
my $dst = $ARGV[0];
$str =~ s"share\/\?uid=([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{4})"data/$1/$2/$3/$4/";
$dst =~ s".*/share/\?uid="";
system("wget", "-O", $dst . ".mp3", $str . "/mix.mp3");
}