[johngg@ovs276 perl]$ cat spw708412.dat 
abc|123
def|456
[johngg@ovs276 perl]$ ./spw708412
%stuff = (
           'def' => '456',
           'abc' => '123'
         );
[johngg@ovs276 perl]$