for my $counter (0 .. $#fin){
        push(@Arr,Note->unpack($fin[$counter]));
    }