【Perl 】初心者コーナーPart5

>>805
方法1で充分だと思うけど。
ただしifで分けるんじゃなくて、
$dareka = "$random.txt";　とでもしてやれば。
あと、Perl5以降はsrand要りません。