$ perl loadData.pl
Name "main::fum" used only once: possible typo at loadData.pl line 16.
Name "main::fo" used only once: possible typo at loadData.pl line 16.
Name "main::fi" used only once: possible typo at loadData.pl line 16.
Name "main::fee" used only once: possible typo at loadData.pl line 16.
$VAR1 = 'FEE';
$VAR2 = 'FI';
$VAR3 = 'FO';
$VAR4 = 'fee';
$VAR5 = 'fi';
$VAR6 = 'fo';
$VAR7 = 'fum';