Onko se oltava puhdasta bash:ia?
Kai tuo onnistuu mutta jos hommalla kiire niin olisiko perl mitään
Aamusta taisi olla vielä aivot kohmeessa. Tarkoitin että olen tutkinut awkia ja sediä ko. tarkoitukseen. Täytynee alkaa tutustua perliin. Ei ole vaan ennen tullut käytettyä sitä. W-tyylillä olisin varmaan jo tehnyt sen Qbasicillä.
Olisko tuosta pohjaksi ja malliksi?
#!/usr/bin/perl -w
open(IN,$ARGV[0]);
while(<IN>)
{
chomp();
$alkukirjain=substr($_,0,1);
if($alkukirjain eq uc($alkukirjain))
{
print "\n".$_;
}
else
{
print " ".$_."";
}
}
Edit: Niinjoo, tuo $ARGV[0] on sitten ao. skriptille annettava tiedostonimi.
eli jos skripti on nimetty palikka.pl niin loitsu ./palikka tutkittava_file.txt
Ja luonnollisesti vain tekstifilet kelpaavat syötteeksi, ei mitään pakattuja ja/tai muita binäärijuttuja.