@file_info = qw(data1 data2 data3); %files = ( X => \@file_info )