如何在 Perl 中将字符串转换为数字?
在 Perl 中,我们可以通过在字符串前面添加整数 0 来将其转换为数字。还有一些其他的方法,我们将在本教程中通过示例进行讨论。
示例
让我们首先考虑我们要转换的字符串类似于“123abc”或“23Hzbc”的情况。您可以看到它同时包含整数和字符。请考虑以下代码。
my $firstStr = '23ASDF'; print "Convering First String to Number: ", $firstStr + 0; print "\n"; my $secondStr = '123abc'; print "Convering Second String to Number: ", $secondStr + 0;
输出
在上面的代码中,我们只是添加了数字“0”来将给定的字符串转换为整数。点击“编辑并运行”并检查此代码的输出 -
Convering First String to Number: 23 Convering Second String to Number: 123
示例
现在,让我们考虑另一种情况,我们的字符串类似于“abc”或“Hello”。请考虑以下代码。
my $str = 'Hello'; print "Converting String to Number: ", $str + 100; print "\n"; my $anotherStr = 'Sample'; print "Converting String to Number: ", $anotherStr + 0;
输出
在上面的代码中,我们只是添加了数字 0 和数字 100 来将字符串转换为整数。点击“编辑并运行”并检查输出 -
Converting String to Number: 100 Converting String to Number: 0
示例
在 Perl 中将字符串转换为数字的另一种方法是简单地连接两个字符串以获得整数。请考虑以下代码。
my $sum = '5.45' + '0.01'; my $anotherSum = '5.01' + '0.07'; print "Addition 1: ", $sum; print "\n"; print "Addition 2: ", $anotherSum;
输出
点击“编辑并运行”以检查此代码的输出 -
Addition 1: 5.46 Addition 2: 5.08
结论
在本教程中,我们使用了一些简单的示例来演示如何在 Perl 中将字符串转换为数字。
广告