Help for this page

Select Code to Download


  1. or download this
     
#!/usr/bin/perl -w
# 
...
__DATA__
0004$ADAM0002*330004%19770004$BOB 0002*430004%1967
0003$XDA0002*440004%22220003$XOB0002*990004%3333
  2. or download this
     
Process started >>>
$ => ADAM,BOB ,XDA,XOB
...
size of hash:  3.
------------------------------------------------------------
<<< Process finished.