| 订阅 | 在线投稿
分享
 
 
当前位置: 王朝网络 >> perl >> gong neng feng fu de Perl: bian xie shuo ying yu de Perl cheng xu

gong neng feng fu de Perl: bian xie shuo ying yu de Perl cheng xu

2008-05-19 06:25:54 编辑來源:互联网 评论
 
 
 
本文为【功能丰富的Perl:编写说英语的Perl程序】的拼音翻译版
  she ji cheng xu de yong hu jie mian ke neng hen kun nan er qie hao shi 。Teodor Zlatanov tao lun le ru he shi yong Parse::RecDescent mo kuai lai yong jian dan de ying yu chuang jian yong hu jie mian wen fa 。 ta huan zhan shi le xiang cheng xu tian jia gong neng huo cong cheng xu chu qu gong neng shi , geng gai wen fa shi ru he de fang bian 。 ling wai huan yu biao zhun de CLI jie xi qi he GUI jin xing le bi jiao , tao lun le zhe zhong fang fa de you que dian 。
  sui gong neng yi qi fa zhan de hen bang de yong hu jie mian
  yin wei yong hu jie mian shi cheng xu zui chu de ru kou , suo yi ta bi xu neng gou yong yu duo zhong mu de 。 bi xu xiang yong hu ti gong dui cheng xu suo you gong neng de he shi fang wen 。 zai xiang cheng xu tian jia geng duo gong neng shi ( zhe ji hu shi bi ran fa sheng de qing kuang ), ta bi xu shi ke kuo zhan de 。 bi xu ju bei ling huo xing , ke yi jie shou chang yong ming ling de suo xie he kuai jie fang shi 。 ta bu ying gai you ceng die de cai dan huo pu bu shi dan ci , zhe yang hui rang yong hu gan dao mi huo 。 wu ke fou ren , yi shang suo you zhe xie yao qiu dui cheng xu yuan lai shuo dou shi fu duo de yue shu , dui ci mei you yi zhong hen hao de jie jue fang an neng ba ta men quan bao kuo 。 xu duo ruan jian chan pin kai fa ren yuan dao zui hou zai jie jue yong hu jie mian wen ti , ba ta zuo wei yi zhong shi hou lai kao lv de wen ti 。 ling wai yi xie kai fa ren yuan ze shou xian zhu yao kao lv yong hu jie mian , rang gong neng jin jin cheng wei jie mian she ji xuan ze de jie guo 。 zhe xie dou bu shi li xiang de fang fa 。 yong hu jie mian (UI) ying gai sui zhe cheng xu gong neng de fa zhan er fa zhan , liang zhe jiu xiang yi mei ying bi de zheng fan mian 。
  zhe li wo men jiang mian xiang jie xi de fang fa yong yu yong hu jie mian 。 sui ran zhe zhong fang fa shi he yu GUI jie mian , dan ben wen bu tao lun GUI she ji 。 wo men jiang zhuan men tao lun ji yu wen ben de UI。 shou xian , jiang jian yao jie shao biao zhun de wen ben UI she ji xuan ze , shi nin neng shu xi gai huan jing 。 ran hou , jiang zhan shi Parse::RecDescent jie jue fang an , shi shi zheng ming ta shi ling huo 、 zhi guan he yi yu bian xie de !
  zhu : wei le yun xing wo men suo tao lun de mou xie cheng xu , jiang xu yao Parse::RecDescent CPAN mo kuai 。
  yong chuan tong de Unix fang shi chuang jian de jian dan yong hu jie mian
  Unix yong hu fei chang shu xi ji yu wen ben de UI mo xing 。 she xiang you yi ge Perl cheng xu , rang wo men xian kan yi xia zhe ge mo xing yong yu gai cheng xu de jian dan shi xian 。 biao zhun de Getopt::Std mo kuai jian hua le ming ling xing shen shu de jie xi 。 zhe ge cheng xu jin jin wei le shuo ming Getopt::Std mo kuai ( mei you shi ji yong tu )。 qing shen yue ben wen hou mian de shen kao zi liao 。
  shi yong Getopt::Std de ming ling xing kai guan
  #!/usr/bin/perl -w
  use strict;# always use strict, it's a good habit
  use Getopt::Std;# see "perldoc Getopt::Std"
  my %options;
  getopts('f:hl', \%options);# read the options with getopts
  # uncomment the following two lines to see what the options hash contains
  #use Data::Dumper;
  #print Dumper \%options;
  $options{h} && usage();# the -h switch
  # use the -f switch, if it's given, or use a default configuration filename
  my $config_file = $options{f} || 'first.conf';
  print "Configuration file is $config_file\n";
  # check for the -l switch
  if ($options{l})
  {
  system('/bin/ls -l');
  }
  else
  {
  system('/bin/ls');
  }
  # print out the help and exit
  sub usage
  {
  print
  first.pl [-l] [-h] [-f FILENAME]
  Lists the files in the current directory, using either /bin/ls or
  /bin/ls -l.
  The -f switch selects a different configuration file.
  The -h switch prints this help.
  EOHIPPUS
  exit;
  }
  jian dan de shi jian xun huan
  dang ming ling xing shen shu bu gou yong shi , xia yi bu shi bian xie yi ge shi jian xun huan 。 zai zhe zhong fang an zhong , reng ran ke jie shou ming ling xing shen shu , bing qie you shi zhi shi yong ming ling xing shen shu jiu zu gou le 。 ran er , shi jian xun huan zhi chi yong hu zai bu shu ru ren he shen shu de qing xing xia tiao yong cheng xu , yi ji kan dao ti shi fu 。 zai ci ti shi fu xia , tong chang ke shi yong help ming ling , zhe jiang da yin chu geng xiang xi de bang zhu 。 you shi , zhe ge help shen zhi ke yi shi yi ge dan du de shu ru ti shi fu , you yi ge wan zheng de ruan jian zi xi tong lai zhuan men fu ze ta 。
  dai you ming ling xing kai guan de shi jian xun huan
  #!/usr/bin/perl -w
  use strict; # always use strict, it's a good habit
  use Getopt::Std; # see "perldoc Getopt::Std"
  my %options;
  getopts('f:hl', \%options); # read the options with getopts
  # uncomment the following two lines to see what the options hash contains
  #use Data::Dumper;
  #print Dumper \%options;
  $options{h} && usage(1); # the -h switch, with exit option
  # use the -f switch, if it's given, or use a default configuration filename
  my $config_file = $options{f} || 'first.conf';
  print "Configuration file is $config_file\n";
  # check for the -l switch
  if ($options{l})
  {
  system('/bin/ls -l');
  }
  else
  {
  my $input; # a variable to hold user input
  do
  {
  print "Type 'help' for help, or 'quit' to quit\n- ";
  $input = ;
  print "You entered $input\n"; # let the user know what we got
  # note that 'listlong' matches /list/, so listlong has to come first
  # also, the i switch is used so upper/lower case makes no difference
  if ($input =~ /listlong/i)
  {
  system('/bin/ls -l');
  }
  elsif ($input =~ /list/i)
  {
  system('/bin/ls');
  }
  elsif ($input =~ /help/i)
  {
  usage();
  }
  elsif ($input =~ /quit/i)
  {
  exit;
  }
  }
  while (1); # only 'quit' or ^C can exit the loop
  }
  exit; # implicit exit here anyway
  # print out the help and exit
  sub usage
  {
  my $exit = shift @_ || 0; # don't exit unless explicitly told so
  print
  first.pl [-l] [-h] [-f FILENAME]
  The -l switch lists the files in the current directory, using /bin/ls -l.
  The -f switch selects a different configuration file.
  The -h
  switch prints this help.
  Without the -l or -h arguments, will show
  a command prompt.
  Commands you can use at the prompt:
  list:
  list the files in the current directory
  listlong:
  list the files in the current directory in long format
  help:
  print out this help
  quit:
  quit the program
  EOHIPPUS
  exit if $exit;
  }
  zhe li , tong chang hui you san zhong xuan ze :
  you yu ke neng hui you duo ge kai guan zu he , suo yi cheng xu de UI hui fu duo dao bu ke ren shou de cheng du 。
  UI jiang fa zhan wei GUI。
  cong tou chong xin kai fa UI, shi qi zhi shao dai you yi xie jie xi gong neng 。
  di yi zhong xuan ze tai ke pa , nan yi qu xiang xiang 。 zhe li bu tao lun di er zhong xuan ze , dan ta de que zai xiang hou jian rong xing he ling huo xing fang mian ti chu le you qu de tiao zhan 。 di san zhong xuan ze shi ben wen xia mian yao tao lun de nei rong 。
  Parse::RecDescent de kuai su jiao cheng
  Parse::RecDescent shi yi ge yong yu jie xi wen ben de mo kuai 。 tong guo ji ge jian dan gou zao jiu ke yi yong ta wan cheng ji hu suo you de jie xi ren wu 。 geng gao ji de wen fa gou zao ke neng hui rang ren wang er sheng wei , bu guo zai da duo shu yong tu zhong bu xu yao zhe me gao ji de wen fa 。
  Parse::RecDescent shi yi ge mian xiang dui xiang de mo kuai 。 ta wei rao zhe wen fa chuang jian jie xi qi dui xiang 。 wen fa (grammar) shi yi zu yi wen ben xing shi biao shi de gui ze 。 xia mian zhe ge shi li shi yi tiao pi pei dan ci de gui ze :
  word gui ze
  word: /\w+/
  zhe tiao gui ze yi ci huo duo ci pi pei zi fu (\w)。 gen zai mao hao hou de bu fen cheng wei chan pin (production)。 yi tiao gui ze bi xu bao han zhi shao yi ge chan pin 。 yi ge chan pin ke yi bao han qi ta gui ze huo zhi jie yao pi pei de nei rong 。 xia mian zhe ge shi li shi yi tiao gui ze , ta ke yi pi pei yi ge dan ci 、 ling yi tiao gui ze (non-word) huo yi ge cuo wu ( ru guo qi ta liang ge dou shi bai ):
  ling yi xie chan pin
  token: word | non-word |
  word: /\w+/
  non-word: /\W+/
  mei ge chan pin ye ke yi bao han yi ge yong hua kuo hao kuo qi de cao zuo :
  chan pin zhong de cao zuo
  print: /print/i { print_function(); }
  ru guo cao zuo shi chan pin zhong de zui hou yi xiang , ze cao zuo de fan hui ma jue ding chan pin shi fou cheng gong 。 gai cao zuo shi yi zhong kong chan pin , ta jiang zong shi hui pi pei , chu fei ta fan hui 0。
  ke yi yong (s) xiu shi fu zhi ding duo ge biao ji (token):
  yi ge chan pin zhong dai yi ge huo duo ge biao ji
  word: letter(s)
  letter: /\w/
  ye ke yi jiang (?)(0 huo 1) he (s?)(0 dao N) xiu shi fu zuo wei ke xuan guan jian zi lai shi yong 。
  ke yi tong guo $item[position] huo $item{name} ji zhi lai fang wen chan pin zhong de ren he nei rong 。 qing zhu yi , zai di er zhong qing xing zhong , liang ge dan ci de ming cheng shi xiang tong de , suo yi bi xu shi yong wei zhi cha zhao 。 zai di san zhong qing xing zhong , dan ci shu zu yi shu zu yin yong de xing shi cun chu zai $item{word} zhong 。 ru guo zai chan pin zhong shi yong ke xuan xiang , ze shu zu ding wei fang an jiang ken ding wu fa hen hao di gong zuo 。 yi ban lai shuo , wu lun ru he dou ying bi mian shi yong zhe zhong fang an , yin wei tong guo ming cheng cha zhao de fang shi zong shi geng fang bian geng jian dan :
  shi yong %item he @item bian liang
  print: /print/i word { print_function($item{word}); }
  print2: /print2/i word word { print_function($item[1], $item[2]); }
  print3: /print3/i w
  【原文】【汉音对照
 
 
 
 
 
 
 
 
 
日版宠物情人插曲《Winding Road》歌词

日版宠物情人2017的插曲,很带节奏感,日语的,女生唱的。 最后听见是在第8集的时候女主手割伤了,然后男主用嘴帮她吸了一下,插曲就出来了。 歌手:Def...

兄弟共妻,我成了他们夜里的美食

老钟家的两个儿子很特别,就是跟其他的人不太一样,魔一般的执着。兄弟俩都到了要结婚的年龄了,不管自家老爹怎么磨破嘴皮子,兄弟俩说不娶就不娶,老父母为兄弟两操碎了心...

如何磨出破洞牛仔裤?牛仔裤怎么剪破洞?

把牛仔裤磨出有线的破洞 1、具体工具就是磨脚石,下面垫一个硬物,然后用磨脚石一直磨一直磨,到把那块磨薄了,用手撕开就好了。出来的洞啊很自然的。需要猫须的话调几...

我就是扫描下图得到了敬业福和爱国福

先来看下敬业福和爱国福 今年春节,支付宝再次推出了“五福红包”活动,表示要“把欠大家的敬业福都还给大家”。 今天该活动正式启动,和去年一样,需要收集“五福”...

冰箱异味产生的原因和臭味去除的方法

有时候我们打开冰箱就会闻到一股异味,冰箱里的这种异味是因为一些物质发出的气味的混合体,闻起来让人恶心。 产生这些异味的主要原因有以下几点。 1、很多人有这种习...

 
 
   she ji cheng xu de yong hu jie mian ke neng hen kun nan er qie hao shi 。Teodor Zlatanov tao lun le ru he shi yong Parse::RecDescent mo kuai lai yong jian dan de ying yu chuang jian yong hu jie mian wen fa 。 ta huan zhan shi le xiang cheng xu tian jia gong neng huo cong cheng xu chu qu gong neng shi , geng gai wen fa shi ru he de fang bian 。 ling wai huan yu biao zhun de CLI jie xi qi he GUI jin xing le bi jiao , tao lun le zhe zhong fang fa de you que dian 。    sui gong neng yi qi fa zhan de hen bang de yong hu jie mian    yin wei yong hu jie mian shi cheng xu zui chu de ru kou , suo yi ta bi xu neng gou yong yu duo zhong mu de 。 bi xu xiang yong hu ti gong dui cheng xu suo you gong neng de he shi fang wen 。 zai xiang cheng xu tian jia geng duo gong neng shi ( zhe ji hu shi bi ran fa sheng de qing kuang ), ta bi xu shi ke kuo zhan de 。 bi xu ju bei ling huo xing , ke yi jie shou chang yong ming ling de suo xie he kuai jie fang shi 。 ta bu ying gai you ceng die de cai dan huo pu bu shi dan ci , zhe yang hui rang yong hu gan dao mi huo 。 wu ke fou ren , yi shang suo you zhe xie yao qiu dui cheng xu yuan lai shuo dou shi fu duo de yue shu , dui ci mei you yi zhong hen hao de jie jue fang an neng ba ta men quan bao kuo 。 xu duo ruan jian chan pin kai fa ren yuan dao zui hou zai jie jue yong hu jie mian wen ti , ba ta zuo wei yi zhong shi hou lai kao lv de wen ti 。 ling wai yi xie kai fa ren yuan ze shou xian zhu yao kao lv yong hu jie mian , rang gong neng jin jin cheng wei jie mian she ji xuan ze de jie guo 。 zhe xie dou bu shi li xiang de fang fa 。 yong hu jie mian (UI) ying gai sui zhe cheng xu gong neng de fa zhan er fa zhan , liang zhe jiu xiang yi mei ying bi de zheng fan mian 。    zhe li wo men jiang mian xiang jie xi de fang fa yong yu yong hu jie mian 。 sui ran zhe zhong fang fa shi he yu GUI jie mian , dan ben wen bu tao lun GUI she ji 。 wo men jiang zhuan men tao lun ji yu wen ben de UI。 shou xian , jiang jian yao jie shao biao zhun de wen ben UI she ji xuan ze , shi nin neng shu xi gai huan jing 。 ran hou , jiang zhan shi Parse::RecDescent jie jue fang an , shi shi zheng ming ta shi ling huo 、 zhi guan he yi yu bian xie de !    zhu : wei le yun xing wo men suo tao lun de mou xie cheng xu , jiang xu yao Parse::RecDescent CPAN mo kuai 。    yong chuan tong de Unix fang shi chuang jian de jian dan yong hu jie mian   Unix yong hu fei chang shu xi ji yu wen ben de UI mo xing 。 she xiang you yi ge Perl cheng xu , rang wo men xian kan yi xia zhe ge mo xing yong yu gai cheng xu de jian dan shi xian 。 biao zhun de Getopt::Std mo kuai jian hua le ming ling xing shen shu de jie xi 。 zhe ge cheng xu jin jin wei le shuo ming Getopt::Std mo kuai ( mei you shi ji yong tu )。 qing shen yue ben wen hou mian de shen kao zi liao 。    shi yong Getopt::Std de ming ling xing kai guan   #!/usr/bin/perl -w   use strict; # always use strict, it's a good habit   use Getopt::Std; # see "perldoc Getopt::Std"   my %options;   getopts('f:hl', \%options); # read the options with getopts   # uncomment the following two lines to see what the options hash contains   #use Data::Dumper;   #print Dumper \%options;   $options{h} && usage(); # the -h switch   # use the -f switch, if it's given, or use a default configuration filename   my $config_file = $options{f} || 'first.conf';   print "Configuration file is $config_file\n";   # check for the -l switch   if ($options{l})   {   system('/bin/ls -l');   }   else   {   system('/bin/ls');   }   # print out the help and exit   sub usage   {   print   first.pl [-l] [-h] [-f FILENAME]   Lists the files in the current directory, using either /bin/ls or   /bin/ls -l.   The -f switch selects a different configuration file.   The -h switch prints this help.   EOHIPPUS   exit;   }    jian dan de shi jian xun huan    dang ming ling xing shen shu bu gou yong shi , xia yi bu shi bian xie yi ge shi jian xun huan 。 zai zhe zhong fang an zhong , reng ran ke jie shou ming ling xing shen shu , bing qie you shi zhi shi yong ming ling xing shen shu jiu zu gou le 。 ran er , shi jian xun huan zhi chi yong hu zai bu shu ru ren he shen shu de qing xing xia tiao yong cheng xu , yi ji kan dao ti shi fu 。 zai ci ti shi fu xia , tong chang ke shi yong help ming ling , zhe jiang da yin chu geng xiang xi de bang zhu 。 you shi , zhe ge help shen zhi ke yi shi yi ge dan du de shu ru ti shi fu , you yi ge wan zheng de ruan jian zi xi tong lai zhuan men fu ze ta 。    dai you ming ling xing kai guan de shi jian xun huan   #!/usr/bin/perl -w   use strict; # always use strict, it's a good habit   use Getopt::Std; # see "perldoc Getopt::Std"   my %options;   getopts('f:hl', \%options); # read the options with getopts   # uncomment the following two lines to see what the options hash contains   #use Data::Dumper;   #print Dumper \%options;   $options{h} && usage(1); # the -h switch, with exit option   # use the -f switch, if it's given, or use a default configuration filename   my $config_file = $options{f} || 'first.conf';   print "Configuration file is $config_file\n";   # check for the -l switch   if ($options{l})   {   system('/bin/ls -l');   }   else   {   my $input; # a variable to hold user input   do   {   print "Type 'help' for help, or 'quit' to quit\n- ";   $input = ;   print "You entered $input\n"; # let the user know what we got   # note that 'listlong' matches /list/, so listlong has to come first   # also, the i switch is used so upper/lower case makes no difference   if ($input =~ /listlong/i)   {   system('/bin/ls -l');   }   elsif ($input =~ /list/i)   {   system('/bin/ls');   }   elsif ($input =~ /help/i)   {   usage();   }   elsif ($input =~ /quit/i)   {   exit;   }   }   while (1); # only 'quit' or ^C can exit the loop   }   exit; # implicit exit here anyway   # print out the help and exit   sub usage   {   my $exit = shift @_ || 0; # don't exit unless explicitly told so   print   first.pl [-l] [-h] [-f FILENAME]   The -l switch lists the files in the current directory, using /bin/ls -l.   The -f switch selects a different configuration file.   The -h   switch prints this help.   Without the -l or -h arguments, will show   a command prompt.   Commands you can use at the prompt:   list:   list the files in the current directory   listlong:   list the files in the current directory in long format   help:   print out this help   quit:   quit the program   EOHIPPUS   exit if $exit;   }    zhe li , tong chang hui you san zhong xuan ze :    you yu ke neng hui you duo ge kai guan zu he , suo yi cheng xu de UI hui fu duo dao bu ke ren shou de cheng du 。   UI jiang fa zhan wei GUI。    cong tou chong xin kai fa UI, shi qi zhi shao dai you yi xie jie xi gong neng 。    di yi zhong xuan ze tai ke pa , nan yi qu xiang xiang 。 zhe li bu tao lun di er zhong xuan ze , dan ta de que zai xiang hou jian rong xing he ling huo xing fang mian ti chu le you qu de tiao zhan 。 di san zhong xuan ze shi ben wen xia mian yao tao lun de nei rong 。   Parse::RecDescent de kuai su jiao cheng   Parse::RecDescent shi yi ge yong yu jie xi wen ben de mo kuai 。 tong guo ji ge jian dan gou zao jiu ke yi yong ta wan cheng ji hu suo you de jie xi ren wu 。 geng gao ji de wen fa gou zao ke neng hui rang ren wang er sheng wei , bu guo zai da duo shu yong tu zhong bu xu yao zhe me gao ji de wen fa 。   Parse::RecDescent shi yi ge mian xiang dui xiang de mo kuai 。 ta wei rao zhe wen fa chuang jian jie xi qi dui xiang 。 wen fa (grammar) shi yi zu yi wen ben xing shi biao shi de gui ze 。 xia mian zhe ge shi li shi yi tiao pi pei dan ci de gui ze :   word gui ze   word: /\w+/    zhe tiao gui ze yi ci huo duo ci pi pei zi fu (\w)。 gen zai mao hao hou de bu fen cheng wei chan pin (production)。 yi tiao gui ze bi xu bao han zhi shao yi ge chan pin 。 yi ge chan pin ke yi bao han qi ta gui ze huo zhi jie yao pi pei de nei rong 。 xia mian zhe ge shi li shi yi tiao gui ze , ta ke yi pi pei yi ge dan ci 、 ling yi tiao gui ze (non-word) huo yi ge cuo wu ( ru guo qi ta liang ge dou shi bai ):    ling yi xie chan pin   token: word | non-word |   word: /\w+/   non-word: /\W+/    mei ge chan pin ye ke yi bao han yi ge yong hua kuo hao kuo qi de cao zuo :    chan pin zhong de cao zuo   print: /print/i { print_function(); }    ru guo cao zuo shi chan pin zhong de zui hou yi xiang , ze cao zuo de fan hui ma jue ding chan pin shi fou cheng gong 。 gai cao zuo shi yi zhong kong chan pin , ta jiang zong shi hui pi pei , chu fei ta fan hui 0。    ke yi yong (s) xiu shi fu zhi ding duo ge biao ji (token):    yi ge chan pin zhong dai yi ge huo duo ge biao ji   word: letter(s)   letter: /\w/    ye ke yi jiang (?)(0 huo 1) he (s?)(0 dao N) xiu shi fu zuo wei ke xuan guan jian zi lai shi yong 。    ke yi tong guo $item[position] huo $item{name} ji zhi lai fang wen chan pin zhong de ren he nei rong 。 qing zhu yi , zai di er zhong qing xing zhong , liang ge dan ci de ming cheng shi xiang tong de , suo yi bi xu shi yong wei zhi cha zhao 。 zai di san zhong qing xing zhong , dan ci shu zu yi shu zu yin yong de xing shi cun chu zai $item{word} zhong 。 ru guo zai chan pin zhong shi yong ke xuan xiang , ze shu zu ding wei fang an jiang ken ding wu fa hen hao di gong zuo 。 yi ban lai shuo , wu lun ru he dou ying bi mian shi yong zhe zhong fang an , yin wei tong guo ming cheng cha zhao de fang shi zong shi geng fang bian geng jian dan :    shi yong %item he @item bian liang   print: /print/i word { print_function($item{word}); }   print2: /print2/i word word { print_function($item[1], $item[2]); }   print3: /print3/i w   
󰈣󰈤
  免责声明:本文仅代表作者个人观点,与王朝网络无关。王朝网络登载此文出于传递更多信息之目的,并不意味着赞同其观点或证实其描述,其原创性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
时尚秀气模特裴裴(8)
时尚秀气模特裴裴(7)
时尚秀气模特裴裴(6)
时尚秀气模特裴裴(5)
白墙黑瓦
广州东郊[原创]
八美至丹巴的东谷天然盆景
不一样的
 
>>返回首页<<
 
 
 为你推荐
 
 
 
 转载本文
 UBB代码 HTML代码
复制到剪贴板...
 
 热帖排行
 
 
 
 
 
©2005- 王朝网络 版权所有