yxxs123 发表于 2018-8-30 10:53:13

perl-切割数组

  #!/usr/bin/perl
  my $message = '';
  $message = supperMonitor();
  @strArr=split(/\n/,$message);
  my $i=1;
  my $count=1;
  my $msg='';
  while($count
页: [1]
查看完整版本: perl-切割数组