字符串与数字之间的转换

1 #!/usr/bin/perl
2 
3 use strict;
4 use warnings;
5 
6 my $number = 1;$number =~/(w*)/;print "$1"; 
7 $number++;print "$number
";

【推广】免费学中医，健康全家人

原文地址：https://www.cnblogs.com/yuanjingnan/p/11091356.html