小编Dav*_*vid的帖子

我试图制作一个程序,将十进制数或文本转换为Perl中的二进制数.程序要求用户输入字符或字符串,然后将结果打印到控制台.我该怎么做呢？我一直在研究的代码如下,但我似乎无法修复它.

print "Enter a number to convert: ";
chomp($decimal = <STDIN>);
print "\nConverting $number to binary...\n";
$remainder = $decimal%2;
while($decimal > 0)
{
    $decimal/2;
    print $remainder;
}