Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

use strict;
...
d_12_4_5-e_4_5_6- g_5_6_7-d_6_8_6-
b_1_1_7-f_3_8_7_8-d_4_1_4- d_4_1_5-b_1_1_7-f_3_8_3
b_1_1_7-f_3_8_7_8-d_4_1_4- e_3_3_1-f_3_8_7-f_21_3_1-b_1_1_7-a_1_1_1-
  2. or download this
    perl "F:\perl_TK\perldb\perl1data3.pl"
Process started >>>
a_12_3_5- is in k_3_4_6-a_12_3_5-
...
b_1_1_7- is in e_3_3_1-f_3_8_7-f_21_3_1-b_1_1_7-a_1_1_1-
<<< Process finished.
================ READY ================