Re: s/// question

I'm just using ultraedit-32, ActiveState Perl
and windows notepad. Like I said: " I do not get it".
Could the fact that I have to use

undef $/;
$regel = <FH_input>
[download]

Have an influence?

Thanks for the support untill now :-) :-)
Nylon

Comment on Re: s/// question Download Code

Replies are listed 'Best First'.
Re: Re: s/// question by jonadab (Parson) on Oct 02, 2003 at 12:59 UTC
`undef $/; $regel = <FH_input>` [download] All this does is read the entire contents of your input file into $regel in one fell swoop. It should still have the newlines in it that it had originally, and in any case how you do your input shouldn't have any impact on newlines that you explicitely insert in your output. I'd say that's not your problem. Maybe you should post the whole script here. Maybe Notepad is part of the issue. What happens if you look at the file in another editor (UltraEdit or whatever, or even EDIT.COM) or pull up a command prompt and use the TYPE command to display it? `$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}} split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Re: s/// question
by jonadab (Parson) on Oct 02, 2003 at 12:59 UTC

undef $/;
$regel = <FH_input>
[download]

All this does is read the entire contents of your input file into $regel in one fell swoop. It should still have the newlines in it that it had originally, and in any case how you do your input shouldn't have any impact on newlines that you explicitely insert in your output. I'd say that's not your problem. Maybe you should post the whole script here.

Maybe Notepad is part of the issue. What happens if you look at the file in another editor (UltraEdit or whatever, or even EDIT.COM) or pull up a command prompt and use the TYPE command to display it?

$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/
[download]

[reply]
[d/l]
[select]