Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by zhang1129

  1. zhang1129

    write in binary

    Thank you.. I got it. tricky.
  2. zhang1129

    write in binary

    thanks. aacturally I used pack/unpack for this porblem, but the result is binary string: like ----------------------- sub dec2bin{ my $str = unpack("B*", pack("f", shift)); $str =~ s/^0+(?=\d)//; return $str; } open (FH, ">c.dat" || die "$!"); binmode (FH); print FH...
  3. zhang1129

    write in binary

    Hi, All. I am trying to write some data into a binary file -------------------------------------- open (FH, ">c.dat" || die "$!"); binmode (FH); print FH "123.3456"; --------------------------------------- the result I got in c.dat is 123.3456. but i really want the result in unicode( the...

Part and Inventory Search

Back
Top