[Perl] пакет проблем

[davyzhu]

Здравейте всички,

Искам да напиша декември данни на Осама данни преводач.
Но аз намерих за $ dec_pack в програмата не се отпечатва "А подписан целочислена стойност", както каза за употреба на опаковката.Защо?Благодарности!

#------------------------------------------------
използва строги;
използване предупреждения;ми декември $ = 1234;
моите $ бен;

$ бен = dec2bin ($ декември);

бен печат "е", $ хамбар, "\ N";

под dec2bin (
моите $ dec_shift = смяна;
dec_shift печат "е", $ dec_shift, "\ N";

моите $ dec_pack = пакет ( "I", $ dec_shift);
Печат "dec_pack ', $ dec_pack," \ N ";

разопаковам връщане ( "B32", $ dec_pack);
)
#------------------------------------------------- ---

С най-добри пожелания,
Дейви

 

[umairsiddiqui]

ако просто искате да конвертирате декември стойност на Осама стойност, помисли "sprintf"