配列型変数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
と表示されることを確認。