'file'
DT_File=HASH(0x3211db4)
'Dedupe_level' => undef
'Delimiter' => ','
'Display_Record' => ARRAY(0x185becc)
empty array
'Header' => 1
'Header_Record' => ARRAY(0x185bc80)
empty array
'Name' => 'current'
'Record' => 1

'Salutation'
Salutation=HASH(0x3212924)
'Dear' => 1
'Fullname1' => ''
'Fullname2' => ''
'Initial1' => ''
'Initial2' => ''
'Sal_file' => 'current'
'Surname1' => ''
'Surname2' => ''
'Title1' => ''
'Title2' => ''
##

##

#@file_parameters contains object method names
foreach my $param (@file_parameters){

    $current{'file'} -> $param($source_file{$key}->$param);

}