>>66
> 数字だけ出して割り振ろうと〜
余計配列とかのが適してない？
ハッシュ(連想配列)でもいいかもしれない。

my $tmp01 = 'シュウマイ';
my $tmp02 = '餃子';
my $soc01 = 100:
my $soc02 = 200:

ってやるより、

my %menu = (
    'シュウマイ', => 100,
    '餃子' => 200,
);

とかやった芳がわかりやすいと思わないかい？。