没甚麼特别的意思, 只是一个介绍用 pack() 的范例, 能将 10 进数转成 2 进数... 但现实里, 你不用这麼做
$dec = 10;$bin = sprintf "%b", $dec ;print "$dec in binary is $bin$/"; # 10 in binary is 1010