tphone,TPhone12模拟器

【tphone,TPhone12模拟器】我用DZsoftpe...根据您的指示,我写了以下代码 , 经过测试完全符合您的要求:第一个TXT , 执行perlpipei.pltable_a#!/usr/bin/perlw # pipei . plus strict;printIDPhoneSexNameBookwhile(){if(/ 。*男性,*/){ print $ _;}}第二个TXT,执行perl pipe 2 . pl table _ b #!/usr/bin/perlw # pipe 2 . plus strict;printName \电话\t书籍\ t;while(){if(/ , * \ S (\ d )\ S 男\s (\S )\s (,*)\ s (\ d )$/){ print $ 2 \ T $ 1 \ T $ 3 if($ 4 > 30

    推荐阅读