my $foo_size = @foo;

print "\nThere are now $foo_size elements in \@foo\n";