Help for this page

Select Code to Download


  1. or download this
    my ($header, @items) = unpack "a300(a18)250", $buff;