[ LUGOS ] odstranitev presledkov in koncev vrstic iz datoteke

[Bostjan Tursic]

Fri, 05 May 2000 ,  Lego Andy wrote:
>> Zanima me kako bi lahko iz neke datoteke ali pa iz stdin izbrisal vse presledke
>> od za?etka vrstice, do prve ?rke in od zadnje ?rke do konca vrstice in vse
>> konce vrstic (newline), tako, da bi bil tekst iz ve?vrsti?ne datoteke ves v eni
>> vrstici.
>
>#!/usr/bin/perl -w
>
>while(<>){
>  s/^\s*//;
>  s/\s*$/ /;
>  print;
>}
>print "\n";
>
>To das v file recimo a.pl, pol pa reces:
>
>cat whatever | perl a.pl
>
>Varjanta b:
>
>cat text | perl -ne "s/^\s*//; s/\s*$/ /; print"

man tr
NAME
       tr - translate or delete characters         

S tem se da to cist enostavno..


Bostjan


-- 
Bostjan.Tursic na kiss.uni-lj.si   http://cast.eu.org/~bostjant/
  http://drive.to/imv/