Help for this page

Select Code to Download


  1. or download this
    # $binarydata is binary data, $id is a ASCII-only number, $command is 
+ASCII-only string.
# so result of concatenation should be binary data
my $line = "$id\t$command\t$datalength\t$binarydata";
syswrite $file, $line ...
  2. or download this
    my ($id, $filename) = split (/\t/, $record);