2015-01-01から1ヶ月間の記事一覧
#!/usr/bin/env perl use strict; use warnings; use Data::Dumper; my @array; foreach (0..4) { push @array, { id => $_, }; } foreach (0..10) { print '$_ is '.$_."\n"; print "array size is ".scalar @array."\n"; last if $_ > scalar @array; prin…