System Functions Perl

  1. Home
  2. Perl
  3. System Functions
  4. Combine unpack and pack in one statement
$decimal = 4;
$binary = unpack("B32", pack("N", $decimal));
print $binary;