Win <-> Lin

[Alexander Jeliazkov]

sofia-pm-list - An official of Sofia's Perl hackers
Alexander Jeliazkov <sas at bitex.com>
Martin Grigorov wrote:

>sofia-pm-list - An official of Sofia's Perl hackers
>Martin Grigorov <m.grigorov at abacustrade.com>
>  
>
>>[snip]
>>
>>    
>>
>>>Vsi4ko raboti i pod Windows i pod Linux, no kogato smenq Config fila ot
>>>Win format na Linux ("\r\n" -> "\n") i vsi4ko se obyrkva.Ne moje da vzeme
>>>nito edna ot nastroikite.Molq pomognete.Kajete kak da go napravq
>>>universalno i formata na SMTP_config na nqma zna4enie za parsera.
>>>Blagodarq vi.
>>>      
>>>
>>Hmm.. ne znam dali shte pomogne, no pyrvo opitaj da izpolzvash 'recsep',
>>kakto e opisano v dokimentacijata na Tie::File.
>>
>>Syvsem otdelno ot tova, az v edin moment pochti se otkazah ot
>>izpolzvaneto na 'chomp', kogato mozhe da mi byde podaden Windowski file;
>>vmesto tova na njakoi mesta pravja s/[\r\n]*$//, koeto kazhi-rechi
>>sigurno raboti :)
>>
>>G'luck,
>>Peter
>>    
>>
>
>  
>
To vsystnost mai po default autochomp = 1, taka che veroqtno problema e 
kakto ti kazvash.
V sluchaq autochomp nqma da pomogne, mi nai-veroqtno tova koeto si napisal.

>Mda, spored perldoc -f chomp, chomp shte izreje $/.
>Tyi 4e mojesh da si napravish i neshto podobno :
>
>BEGIN {
>	$/ = "\r\n" if ( $^O =~ m/win/i );
>}
>
>i da si shtrakash s prysti :)
>Neshto podobno mai trqbva samia Perl da si pravi vytreshno, no iavno ne go 
>pravi. ( test-nah go s Perl 5.8.0 )
>
>Marto
>  
>