-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Rio Martin. wrote:
| On Wednesday 19 January 2005 09:42, Royke K wrote:
|
|> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1
|>
|> Rio Martin. wrote: | On Wednesday 19 January 2005 09:12, Royke K
|> wrote: |> | Pada line 10 apakah tanda ~ memang harus ada ? maaf
|> kalau saya |> | kurang begitu paham tentang PERL secara mendalam
|> .. | | Thanks |> |> buat contekannya, untuk script nya mas Asfik
|> juga sedang | saya |> oprek.. Ada yang pake PERL dan BASH, wah
|> komplit nih, thanks | |> banget .. | | - Rio.Martin - Tanda ~
|> jangan disertakan , sorry |> terkopi dari Vi. Salam | | Oke, saya
|> coba hilangkan , namun errornya masih sama. | |
|> [EMAIL PROTECTED]:~/testscript# ls asfik* royke.pl* test* |
|> [EMAIL PROTECTED]:~/testscript# cat royke.pl #!/usr/bin/perl |
|> my(@Kelas)=`/root/testscript/test | grep 3 | cut -f2 -d" "`; |
|> my(@JS)=`/root/testscript/test | grep Total | cut -f5 -d" " | cut
|> | -c1-2`; my $max = $#JS; | | my($i); | |
|> for($i=0;$i<=$max;$i++) { $JS[$i] =~ s/\n//g; $tulis = `echo |
|> "$JS[$i]" > $Kelas[$i]`; print "[EMAIL PROTECTED]"; } | | exit
|> 1; [EMAIL PROTECTED]:~/testscript# ./test = ABSENSI SEKOLAH =- Kelas |
|> 3IPA1 jumlah total siswa: 25 Total siswa hari ini: 22siswa Kelas
|> | 3IPA2 jumlah total siswa: 20 Total siswa hari ini: 20siswa
|> Kelas | 3IPS1 jumlah total siswa: 42 Total siswa hari ini:
|> 42siswa Kelas | 3IPS2 jumlah total siswa: 42 Total siswa hari
|> ini: 41siswa | [EMAIL PROTECTED]:~/testscript# ./royke.pl Unrecognized
|> character \xA0 at | ./royke.pl line 9. | | - - - - - - - - - - |
|> | Sepertinya yg error antara dua baris ini:
|> for($i=0;$i<=$max;$i++) { | $JS[$i] =~ s/\n//g; | | | Thanks ..
|> | | - Rio.Martin -
|>
|> lupa juga , karena ini perl jalaninya pake perl perl namaskrip.pl
|>
|
|
| Maksudnya seperti ini:
|
| [EMAIL PROTECTED]:~/testscript# perl royke.pl Unrecognized character \xA0
| at royke.pl line 9.
|
| - Rio.Martin -
|
Saya kirim lagi deh, sepertinya ada yang kurang tadi :
#!/usr/bin/perl
my(@Kelas)=`cat Siswa_SMU | grep 3 | cut -f2 -d" "`;
my(@JS)=`cat Siswa_SMU | grep Total | cut -f5 -d" " | cut -c1-2`;
my $max = $#JS;
my($i);
for($i=0;$i<=$max;$i++) {
~ $JS[$i] =~ s/\n//g;
~ $tulis = `echo "$JS[$i]" > $Kelas[$i]`;
~ print "[EMAIL PROTECTED]";
}
exit 1;
Salam
- --
I'm not an expert, I'm not a newbie, I'm a new-pert
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.4 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org
iD8DBQFB7jZdeHz+3aIJ/qQRAmq2AJ9Jz5yn2kUfykONrujcnzNbab13/wCeIv1z
piSdlwPE5e5YHsiMK5s270s=
=7nBu
-----END PGP SIGNATURE-----
--
Unsubscribe: kirim email kosong ke [EMAIL PROTECTED]
Arsip, FAQ, dan info milis di http://linux.or.id/milis.php
Tidak bisa posting? Baca:
http://linux.or.id/wiki/index.php?pagename=ProblemMilisDanSolusi
http://linux.or.id/wiki/index.php?pagename=TataTertibMilis
