Select Code to Download

&make_barn(\@pictures) if ($cumulative >= 5000000);

$pictures = shift;

foreach (@{ $pictures })
{
   #do stuff with $_
}