This what you mean? @one_line_per_index = <FILE>; $multiple_lines = join '', @one_line_per_index;
On Tuesday, September 3, 2002, at 01:35 PM, Tim Musson wrote:
> sub GetBodyFromFile {
> my $file = $0;
> open (INFO, $file);
> @body = <INFO>;
> close(INFO);
> $body="
> 123456789012345678901234567890123456789012345678901234567890123456789012345678
> 1 2 3 4 5 6 7";
> }
>
James
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
