sub test_2{
	my @array;
		for(0 .. 3){ 
			read( DATA, my $foo1,	0x04 );
			read( DATA, my $foo2,	0x04 );
			read( DATA, my $foo3,  	0x04 );
			read( DATA, my $foo4,  	0x04 );
			push (@array, ($foo1, $foo2, $foo3, $foo4 )); #push to array while inside of for loop
		}
	return (@array); #return it after all loop iterations are complete
}