Opened by Froschpopo at 2005-11-03 09:49
User since
2003-10-20
610 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-10-20
610 Artikel
BenutzerIn
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
$test = 2872989898322;
$test = 1234567890; #gekürzte Version
print "Vorher: $test\n";
$test = pack("L",$test);
print "Gepackt: $test\n";
$test = unpack("L", $test);
print "Nachher: $test\n";
exit;
Vorher: 1234567890
Gepackt: ÊxûI (*)
Nachher: 1234567890
*wird im Board nicht richtig angezeigt, desshalb habe ich ein "x" dorthingemacht wo das zeichen abgeändert würde durch das board.
--------
1. Beachte Daten Binär per internet GET, kann Probleme geben.
2. Deine Zahl darf maximal 4294967295 gross sein..
Ist sie grösser, musst die sie teilen..
Z.b. ungefähr so (funktioniert aber noch nicht so richtig):
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
$test = 2872989898322;
#Packen
print "Vorher: $test\n";
while($test > 4294967295)
{
$test = $test - 4294967295;
push(@new,pack("L",4294967295));
}
push(@new,pack("L",$test));
print "Gepackt: @new\n";
#Entpacken
$new = unpack("L$#new", @new);
print "Nachher: $new\n";
<!--EDIT|master|1131026098-->
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;