my @dev;
 while(<DEV>){
 chomp;
 @dev = <DEV>;
}

##</code><code>##

while (<DEV>) {
   chomp;
   push @dev, $_;
}
##</code><code>##

my @dev = <DEV>;
chomp @dev;