Perl到PHP函数转换 - 需要帮助

时间:2011-11-05 15:19:24

标签: php perl

我在Perl中有一个子程序/函数,如下所示:

sub numToStr {
   my ($ipnum) = @_;
   my $z = $ipnum % 256;
   $ipnum >>= 8;
   my $y = $ipnum % 256;
   $ipnum >>= 8;
   my $x = $ipnum % 256;
   $ipnum >>= 8;
   my $w = $ipnum % 256;

   return "$w.$x.$y.$z";
}

如何将它变成PHP替代品?

非常感谢, 欢呼声

2 个答案:

答案 0 :(得分:3)

我想知道http://php.net/long2ip是否是你想要的。

答案 1 :(得分:2)

function numToStr($ipnum)
{
   $z = $ipnum % 256;
   $ipnum >>= 8;
   $y = $ipnum % 256;
   $ipnum >>= 8;
   $x = $ipnum % 256;
   $ipnum >>= 8;
   $w = $ipnum % 256;

   return "$w.$x.$y.$z";
}

或者,您可以使用long2ip()功能。