Perl学习笔记(9) 字符串操作与排序

字符串操作与排序

  • 找出主串中子串的位置。$pos = index($string, $substr);返回在$string中第一次出现$sbustr的位置。
  • 抽取出字串substr。 my $sub = substr($string, $startpos , $len);
  • 格式字符串函数sprintf, my $str = sprintf "%d,%f, %s",$date,$value,$name;
  • 自定义排序,可以自定义一个只有变量$a, $b且返回-1,0,1的自定义排序比较函数。
    my @result = sort by_number @Orginal; sub by_number{$a<=>$b} ; <=>表示按数值比较。另cmp表示按ASCII码比较。
    排序比较函数还可以这么写:
    sub sort_p
    {
           $fine($a) cmp $fine($b) or
           $socorse($a) <=> $scorce($b) or
            $a <=> $b
    }#进行多个字段关联的排序。

你可能感兴趣的:(Date,String,perl)