ファイルからリストに読み込む方法が分からないってこと？
なんかメモリ上に1万個の要素を入れるのがマズいとも読み取れるけど・・・。

open my $in, "UNKO";
my @nums = split(/,/, do { local $/ ; <$in> });
close $in;

とでもすれば。