配列型変数1

#06 配列変数を使ってみよう (1)

use strict;
use warnings;

my @sales = (150,200,300);
# my @colors = ('red','green');
my @mixed = (150,'red',1.5);

print @sales;

my @inc = (1..100);
my @colors = qw(red green);
print @inc;
print @colors;
150200300123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100redgreen

と表示されることを確認。