my $file = '/Users/athina/check-ma/$ID${l}/F${j}\/gangle-dihedrals-${i}${id}${k}.xvg';
open $input, '<', $file or die "Can't open file $file: $!";