字符串操作与排序
- 找出主串中子串的位置。$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
}#进行多个字段关联的排序。