Were you looking for something like the following?

use strict;
use warnings;

my @file_attachments = (
  {file => 'test1.zip',  price  => ['10.00'],  desc  => 'the 1st test'
+},
  {file => 'test2.zip',  price  => ['12.00', '14.00'],  desc  => 'the 
+2nd test'},
  {file => 'test3.zip',  price  => ['13.00', '15.00'],  desc  => 'the 
+3rd test'},
  {file => 'test4.zip',  price  => ['14.00'],  desc  => 'the 4th test'
+}
  );

for my $file_attachment (@file_attachments) {
    print "$file_attachment->{file}:\n";
    print "$_\n" for @{ $file_attachment->{price} };
    print "\n";
}
[download]

Output:

test1.zip:
10.00

test2.zip:
12.00
14.00

test3.zip:
13.00
15.00

test4.zip:
14.00
[download]