Select Code to Download

sub accounts {
  my ($class) = @_;
...
  
  return bless \@accounts, $class;
}

$VAR1 = bless( [
                 'Lady_Aleena',
...
                 'LadyAleena_home',
                 'LadyAleena_test'
               ], 'Twitter::Objects' );

use strict;
use warnings;
...
  print $account;
# and other code I want to run through this loop.
}