Subject: [LINUX:11394] Re: soru?
linux@bilkent.edu.tr
Date: Sun 19 Dec 1999 - 01:02:28 EET
Sadik Bahaettin Akdag wrote:
Tabi var,
Perl ile:
#!/bin/perl
my $string="xxx";
my $filename;
while ($filename=</home/xxx/xxx/*>) {
unless (open (FD,">>$filename")) {
print "Can't open File $filename: $!\n"
} else {
print "$filename\n";
print FD $string;
close(FD);
}
}
Burada /home/xxx/xxx/* yerine istediginiz dizini yazin, istediginiz
text i de $string= de
yazin.
Iyi calismalar,
`Alex
>
> selamlar
> bir sorunum varda yardimci olursaniz sevinirim
> sorun su:
> cat xxxxx >> ????
> komutunu yaklasik 1000 dosya icin kullanmam lazim ve sonuc olarak her biri
> icin ???? (dosya ismini) yeniden yazmaliyim.
> bu komutu kisalastiracak bir olay yok mu ?
> mesela /home/xxx/xxx directory sindeki butun dosyalara ayni islemi
> uygulatacak bir komut?
>
>
> benim yaklasik 1000 dosyam var ve bunlarinin her birinin son tarafina bir
> sey yazilmasi gerekiyor.
>
>
> Listeden cikmak icin:
> unsub linux
> mesajini listeci@bilkent.edu.tr'a gonderiniz.
> Lutfen Listeci icin MIME / HTML / Turkce Aksan kullanmayin.
> Liste arsivinin adresi: http://listweb.bilkent.edu.tr/
Listeden cikmak icin:
unsub linux
mesajini listeci@bilkent.edu.tr'a gonderiniz.
Lutfen Listeci icin MIME / HTML / Turkce Aksan kullanmayin.
Liste arsivinin adresi: http://listweb.bilkent.edu.tr/