my @dssp_objs =(); #reads the files from the command line one line at a time. while(<>) { chomp; # remove the newline. push @dssp_objs, Bio::Structure::SecStr::DSSP::Res->new('-file'=>$_); }