### fee_file.pl
use strict;
use warnings;

$main::fee   = 0xfee;

__END__
Produces the warning message:
Name "main::fee" used only once: possible typo at ...