I'm trying to convert a perl script into objective-C
#!/usr/bin/perl
use strict;
use warnings;
my $rsuser = 'tester';
my $rspass = '12345';
my $login = pack("N", length($rsuser));
$login .= $rsuser;
$login .= pack("N", length($rspass));
$login .= $rspass;
$login .= pack("N", 3);
$login .= 'XXX';
$login = pack("x7") . pack("N", length($login)) . $login;
my $length = pack("N", length($login));
print $stream $length.$login."\n";
this makes heavy use of the perls Pack function. Can anyone provide insight into how I might be able to rewrite this code in Objective-C.
I also need to use perls unpack too..
Thanks
---Guy
#!/usr/bin/perl
use strict;
use warnings;
my $rsuser = 'tester';
my $rspass = '12345';
my $login = pack("N", length($rsuser));
$login .= $rsuser;
$login .= pack("N", length($rspass));
$login .= $rspass;
$login .= pack("N", 3);
$login .= 'XXX';
$login = pack("x7") . pack("N", length($login)) . $login;
my $length = pack("N", length($login));
print $stream $length.$login."\n";
this makes heavy use of the perls Pack function. Can anyone provide insight into how I might be able to rewrite this code in Objective-C.
I also need to use perls unpack too..
Thanks
---Guy