Help for this page

Select Code to Download


  1. or download this
    +-----++-----++-----++-----+
| 0 0 || 0 0 || 0 0 || 0 0 |
| 0 2 || 2 2 || 2 0 || 2 3 |
+-----++-----++-----++-----+
  2. or download this
    my $send="\x02\x22\x20\x23";
my $ob->($send);
  3. or download this
    my $received="02 22 20 22";

my($month,$day,$year1,$year2)=unpack("A2xA2xA2xA4",$received);
...

my $send=$month.$day.$year1.$year2;
$ob->write($send);
  4. or download this
    $month=pack("c",$month); 
$day=pack("c",$day); 
$year1=pack("c",$year1); 
$year2=pack("c",$year2);