Small fixes to Perl scripts

- Fixed get_emport.pl to use command-line arguments
- Renamed get_wrds_data file.