我有一个字符串
my $string = $14.275; ## where i need to remove the $
我尝试使用以下代码
$y = substr($string , 1, index($string));
输出应为14.275
答案 0 :(得分:0)
首先引用字符串值并编写如下代码:
#!/usr/bin/perl
use warnings;
use strict;
my $string = '$14.275';
$string =~ s/^\$//;
print "$string\n";
输出:
14.275