Bit::Vector::String - Generic string import/export for Bit::Vector

  use Bit::Vector::String;

  to_Oct
      $string = $vector->to_Oct();

  from_Oct
      $vector->from_Oct($string);

  new_Oct
      $vector = Bit::Vector->new_Oct($bits,$string);

  String_Export
      $string = $vector->String_Export($type);

  String_Import
      $type = $vector->String_Import($string);

  new_String
      $vector = Bit::Vector->new_String($bits,$string);
      ($vector,$type) = Bit::Vector->new_String($bits,$string);

•

CW$string = $vector->to_Oct(); Returns an octal string representing the given bit vector. Note that this method is not particularly efficient, since it is almost completely realized in Perl, and moreover internally operates on a Perl list of individual octal digits which it concatenates into the final string using "CWjoin('', ...)". A benchmark reveals that this method is about 40 times slower than the method "CWto_Bin()" (which is realized in C):

 Benchmark: timing 10000 iterations of to_Bin, to_Hex, to_Oct...
     to_Bin:  1 wallclock secs ( 1.09 usr +  0.00 sys =  1.09 CPU)
     to_Hex:  1 wallclock secs ( 0.53 usr +  0.00 sys =  0.53 CPU)
     to_Oct: 40 wallclock secs (40.16 usr +  0.05 sys = 40.21 CPU)

Note that since an octal digit is always worth three bits, the length of the resulting string is always a multiple of three bits, regardless of the true length (in bits) of the given bit vector. Also note that the LEAST significant octal digit is located at the RIGHT end of the resulting string, and the MOST significant digit at the LEFT end. Finally, note that this method does NOT prepend any uniquely identifying format prefix (such as 0o) to the resulting string (which means that the result of this method only contains valid octal digits, i.e., [0-7]). However, this can of course most easily be done as needed, as follows:

  $string = '0o' . $vector->to_Oct();

•

CW$vector->from_Oct($string); Allows to read in the contents of a bit vector from an octal string, such as returned by the method "CWto_Oct()" (see above). Note that this method is not particularly efficient, since it is almost completely realized in Perl, and moreover chops the input string into individual characters using "CWsplit(//, $string)". Remember also that the least significant bits are always to the right of an octal string, and the most significant bits to the left. Therefore, the string is actually reversed internally before storing it in the given bit vector using the method "CWChunk_List_Store()", which expects the least significant chunks of data at the beginning of a list. A benchmark reveals that this method is about 40 times slower than the method "CWfrom_Bin()" (which is realized in C):

 Benchmark: timing 10000 iterations of from_Bin, from_Hex, from_Oct...
   from_Bin:  1 wallclock secs ( 1.13 usr +  0.00 sys =  1.13 CPU)
   from_Hex:  1 wallclock secs ( 0.80 usr +  0.00 sys =  0.80 CPU)
   from_Oct: 46 wallclock secs (44.95 usr +  0.00 sys = 44.95 CPU)

If the given string contains any character which is not an octal digit (i.e., [0-7]), a fatal syntax error ensues (unknown string type). Note especially that this method does NOT accept any uniquely identifying format prefix (such as 0o) in the given string; the presence of such a prefix will also lead to the fatal unknown string type error. If the given string contains less octal digits than are needed to completely fill the given bit vector, the remaining (most significant) bits all remain cleared (i.e., set to zero). This also means that, even if the given string does not contain enough digits to completely fill the given bit vector, the previous contents of the bit vector are erased completely. If the given string is longer than it needs to fill the given bit vector, the superfluous characters are simply ignored. This behaviour is intentional so that you may read in the string representing one bit vector into another bit vector of different size, i.e., as much of it as will fit.

•

CW$vector = Bit::Vector->new_Oct($bits,$string); This method is an alternative constructor which allows you to create a new bit vector object (with "CW$bits" bits) and to initialize it all in one go. The method internally first calls the bit vector constructor method "CWnew() and then stores the given string in the newly created bit vector using the same approach as the method CWfrom_Oct()" (described above). Note that this approach is not particularly efficient, since it is almost completely realized in Perl, and moreover chops the input string into individual characters using "CWsplit(//, $string)". An exception will be raised if the necessary memory cannot be allocated (see the description of the method "CWnew()" in Bit::Vector(3) for possible causes) or if the given string cannot be converted successfully (see the description of the method "CWfrom_Oct()" above for details). Note especially that this method does NOT accept any uniquely identifying format prefix (such as 0o) in the given string and that such a prefix will lead to a fatal unknown string type error. In case of an error, the memory occupied by the new bit vector is released again before the exception is actually thrown. If the number of bits "CW$bits given has the value CWundef", the method will automatically allocate a bit vector with a size (i.e., number of bits) of three times the length of the given string (since every octal digit is worth three bits). Note that this behaviour is different from that of the methods "CWnew_Hex(), CWnew_Bin(), CWnew_Dec() and CWnew_Enum() (which are realized in C, internally); these methods will silently assume a value of 0 bits if CWundef is given (and may warn about the Use of uninitialized value" if warnings are enabled).

•

CW$string = $vector->String_Export($type); Returns a string representing the given bit vector in the format specified by "CW$type":

  1 | b | bin      =>  binary        (using "to_Bin()")
  2 | o | oct      =>  octal         (using "to_Oct()")
  3 | d | dec      =>  decimal       (using "to_Dec()")
  4 | h | hex | x  =>  hexadecimal   (using "to_Hex()")
  5 | e | enum     =>  enumeration   (using "to_Enum()")
  6 | p | pack     =>  packed binary (using "Block_Read()")

The case (lower/upper/mixed case) of "CW$type" is ignored. If "CW$type is omitted or CWundef or false (0" or the empty string), a hexadecimal string is returned as the default format. If "CW$type does not have any of the values described above, a fatal unknown string type" will occur. Beware that in order to guarantee that the strings can be correctly parsed and read in by the methods "CWString_Import() and CWnew_String() (described below), the method CWString_Export()" provides uniquely identifying prefixes (and, in one case, a suffix) as follows:

  1 | b | bin      =>  '0b' . $vector->to_Bin();
  2 | o | oct      =>  '0o' . $vector->to_Oct();
  3 | d | dec      =>         $vector->to_Dec(); # prefix is [+-]
  4 | h | hex | x  =>  '0x' . $vector->to_Hex();
  5 | e | enum     =>  '{'  . $vector->to_Enum() . '}';
  6 | p | pack     =>  ':'  . $vector->Size() .
                       ':'  . $vector->Block_Read();

This is necessary because certain strings can be valid representations in more than one format. All strings in binary format, i.e., which only contain 0 and 1, are also valid number representations (of a different value, of course) in octal, decimal and hexadecimal. Likewise, a string in octal format is also valid in decimal and hexadecimal, and a string in decimal format is also valid in hexadecimal. Moreover, if the enumeration of set bits (as returned by "CWto_Enum()") only contains one element, this element could be mistaken for a representation of the entire bit vector (instead of just one bit) in decimal. Beware also that the string returned by format 6 (packed binary) will in general NOT BE PRINTABLE, because it will usually consist of many unprintable characters!

•

CW$type = $vector->String_Import($string); Allows to read in the contents of a bit vector from a string which has previously been produced by "CWString_Export(), CWto_Bin(), CWto_Oct(), CWto_Dec(), CWto_Hex(), CWto_Enum(), CWBlock_Read()" or manually or by another program. Beware however that the string must have the correct format; otherwise a fatal unknown string type error will occur. The correct format is the one returned by "CWString_Export()" (see immediately above). The method will also try to automatically recognize formats without identifying prefix such as returned by the methods "CWto_Bin(), CWto_Oct(), CWto_Dec(), CWto_Hex() and CWto_Enum()". However, as explained above for the method "CWString_Export()", due to the fact that a string may be a valid representation in more than one format, this may lead to unwanted results. The method will try to match the format of the given string in the following order: If the string consists only of [01], it will be considered to be in binary format (although it could be in octal, decimal or hexadecimal format or even be an enumeration with only one element as well). If the string consists only of [0-7], it will be considered to be in octal format (although it could be in decimal or hexadecimal format or even be an enumeration with only one element as well). If the string consists only of [0-9], it will be considered to be in decimal format (although it could be in hexadecimal format or even be an enumeration with only one element as well). If the string consists only of [0-9A-Fa-f], it will be considered to be in hexadecimal format. If the string only contains numbers in decimal format, separated by commas (,) or dashes (-), it is considered to be an enumeration (a single decimal number also qualifies). And if the string starts with :[0-9]:, the remainder of the string is read in with "CWBlock_Store()". To avoid misinterpretations, it is therefore recommendable to always either use the method "CWString_Export()" or to provide some uniquely identifying prefix (and suffix, in one case) yourself:

  binary         =>  '0b' . $string;
  octal          =>  '0o' . $string;
  decimal        =>  '+'  . $string; # in case "$string"
                 =>  '-'  . $string; # has no sign yet
  hexadecimal    =>  '0x' . $string;
                 =>  '0h' . $string;
  enumeration    =>  '{'  . $string . '}';
                 =>  '['  . $string . ']';
                 =>  '<'  . $string . '>';
                 =>  '('  . $string . ')';
  packed binary  =>  ':'  . $vector->Size() .
                     ':'  . $vector->Block_Read();

Note that case (lower/upper/mixed case) is not important and will be ignored by this method. Internally, the method uses the methods "CWfrom_Bin(), CWfrom_Oct(), CWfrom_Dec(), CWfrom_Hex(), CWfrom_Enum() and CWBlock_Store()" for actually importing the contents of the string into the given bit vector. See their descriptions here in this document and in Bit::Vector(3) for any further conditions that must be met and corresponding possible fatal error messages. The method returns the number of the format that has been recognized:

                1    =>    binary
                2    =>    octal
                3    =>    decimal
                4    =>    hexadecimal
                5    =>    enumeration
                6    =>    packed binary

•

CW$vector = Bit::Vector->new_String($bits,$string); CW($vector,$type) = Bit::Vector->new_String($bits,$string); This method is an alternative constructor which allows you to create a new bit vector object (with "CW$bits" bits) and to initialize it all in one go. The method internally first calls the bit vector constructor method "CWnew() and then stores the given string in the newly created bit vector using the same approach as the method CWString_Import()" (described immediately above). An exception will be raised if the necessary memory cannot be allocated (see the description of the method "CWnew()" in Bit::Vector(3) for possible causes) or if the given string cannot be converted successfully (see the description of the method "CWString_Import()" above for details). In case of an error, the memory occupied by the new bit vector is released again before the exception is actually thrown. If the number of bits "CW$bits given has the value CWundef", the method will automatically determine this value for you and allocate a bit vector of the calculated size. Note that this behaviour is different from that of the methods "CWnew_Hex(), CWnew_Bin(), CWnew_Dec() and CWnew_Enum() (which are realized in C, internally); these methods will silently assume a value of 0 bits if CWundef is given (and may warn about the Use of uninitialized value" if warnings are enabled). The necessary number of bits is calculated as follows:

  binary         =>       length($string);
  octal          =>   3 * length($string);
  decimal        =>  int( length($string) * log(1) / log(2) + 1 );
  hexadecimal    =>   4 * length($string);
  enumeration    =>  maximum of values found in $string + 1
  packed binary  =>  $string =~ /^:(\d+):/;

If called in scalar context, the method returns the newly created bit vector object. If called in list context, the method additionally returns the number of the format which has been recognized, as explained above for the method "CWString_Import()".

Bit::Vector(3), Bit::Vector::Overload(3).

This man page documents Bit::Vector::String version 6.4.

  Steffen Beyer
  mailto:sb@engelschall.com
  http://www.engelschall.com/u/sb/download/

Copyright (c) 2004 by Steffen Beyer. All rights reserved.

This package is free software; you can redistribute it and/or modify it under the same terms as Perl itself, i.e., under the terms of the Artistic License or the GNU General Public License.

The C library at the core of this Perl module can additionally be redistributed and/or modified under the terms of the GNU Library General Public License.

Please refer to the files Artistic.txt, GNU_GPL.txt and GNU_LGPL.txt in this distribution for details!

This package is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the GNU General Public License for more details.