foreach my $ISA (@ISA){
  # anything
} # foreach