Re^2: truncating a text file

That gives warnings and extra <br>s when there aren't five lines yet.

>perl -we"@lines = qw( a b c ); print join '<br>', @lines[0..4];
Use of uninitialized value in join or string at -e line 1.
Use of uninitialized value in join or string at -e line 1.
a<br>b<br>c<br><br>
[download]

Also, given $html_doc = "a new set - line 1 {br} $html_doc", you're short a br when there are five lines.

Comment on Re^2: truncating a text file Select or Download Code

Replies are listed 'Best First'.
Re^3: truncating a text file by aquarium (Curate) on Jul 18, 2007 at 01:23 UTC
i think the code should be as follows, to prevent the warnings `$str = 'line 5<br>line 4<br>line 3<br>line 2<br>line 1<br>'; @lines = split('<br>',$str); unshift (@lines,'line 6'); $output = join('<br>',@lines); print $output;` [download] the hardest line to type correctly is: stty erase ^H	[reply] [d/l]
Re^4: truncating a text file by ikegami (Patriarch) on Jul 18, 2007 at 05:11 UTC
Removing the line that gives a warning is a great way of stopping it from giving the warning, as long as you don't mind that the program no longer does the one thing the OP asked for help with.	[reply]