Is this a Perl Script? If not, does anyone know what it is?

File newnum:
++++++++

1:  r+ERROR: Tried to open %s . %s. (error number %d)
2:  ./newnum.lst-d%s %d
3:  PLEASE ENTER EMPLOYEES' FULL NAME: "%s", Is this correct [y/n] :
4:  "%s" is already in list file with number %d.
5:
6:  New number for "%s" is %d. Adding new number to list.
7:  %s,%d
8:  ~

++++++++

(The file newnum.lst referred to in the above file is a list of names &
randomly generated
numbers; here is a portion of that file:)

File newnum.lst:
*********

SECURITY NUMBER 1,99999
SECURITY NUMBER 2,77771
ALICE A. SUNDEEN,24256
ALICE F. NEWCOMB,32065
ALICE M. BROUHARD,16310
AMY E. HORNER,39967
ANDREW R. SHIVELY,16078
ANGELA DAWN ENDERS,36528
ANIE ANNE CARLSON-CRANDALL,12885
ANN DENISE LEWIS,29823
ANN MICHELLE DOBBS,24913
ANN S. HOPKINSON,26672
ANNE C. REID,19287
ANNE I. ANDERSEN,19519
ANNE L. WILBURN,18100
ANNE R. WILLIAMS,13755
ANNE T. WOJCIK,41519
ANYA V. DERKASH,35070
AUDREY K. SPAULDING,20621
BARB VISSER,30616
BARBARA A BUSH,24252
BARBARA A. BRANDENBURG,14493
BARBARA A. CEBULA-MC CUNE,40417
BARBARA A. POECKES,31582
BARBARA H. HENTHORN,38059
BARBARA J. REINKE,36125

************
 Any feedback will be appreciated. This is currently running on a Unix
server.
Thanks
Sara S.
[EMAIL PROTECTED]

Reply via email to