On Friday 08 October 2004 11:57, Beast wrote:
adakah cara cepat/function di perl untuk mendapatkan x karakter dr sisi kanan ke kiri tanpa iterasi karakter satu per satu. contoh:
$str = "abcdefgh";
right(3,$str)
$hasil = "fgh"
substr($s, length($s) - 3, 3); SOL
tks. sudah bisa.
sekarang tambah lagi.
kenapa perl tdk bisa menagkap hasil jika yg diexecute adalah shell script, bkan command.
#!/usr/bin/perl
# hasil blank my $cmd1 = `cmd.sh`; print "results: $cmd1\n";
# hasil ok. my $cmd2 = `ls /home`; print "results: $cmd2\n";
--
--beast
-- Berhenti langganan: [EMAIL PROTECTED] Arsip dan info: http://linux.or.id/milis.php