#@file_parameters contains object method names foreach my $param (@file_parameters){
$current{'file'} -> $param($source_file{$key}->$param);
}