Opened by master at 2005-11-03 09:43
User since
2003-10-20
610 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-10-20
610 Artikel
BenutzerIn
benutze nun syswrite.. kann es sein das der Befehl
etwa 132 mal schneller ist????
Methode 1 -> brauchte 6,6 min.
Methode 2 -> Ist in 0.05 min Fertig!
Stimmt da was nicht?
etwa 132 mal schneller ist????
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
#methode1
# open(RAUS, ">") or die $!;
# binmode(RAUS);
# for(1..($_[1])) {print RAUS $_[2];seek(RAUS, 0, 1);}
# close(RAUS);
#methode2
sysopen(DATEI, $_[0], O_WRONLY | O_CREAT) || die "$Datei: $!";
syswrite(DATEI,$_[2]);
close(DATEI);
Methode 1 -> brauchte 6,6 min.
Methode 2 -> Ist in 0.05 min Fertig!
Stimmt da was nicht?
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;