Thank you R. Singh. It works perfectly as i needed. Cheers
Your Welcome, also if you have blank lines too into your Input_file and you want to leave them as it is, then following may help you. Let's say following is the Input_file:
Output will be as follows.
Thanks,
R. Singh
This User Gave Thanks to RavinderSingh13 For This Post:
Hello All,
I want to add new line character to each of the line '\n'.what is the unix command i can use to do that.File is like below
a|b|c
c|d|f (3 Replies)
I've been looking on the internet, and haven't found anything simple enough to use in my code. All I want to do is count how many times "-" occurs in a string of characters (as a package name). It seems it should be very simple, and shouldn't require more than one line to accomplish.
And this is... (2 Replies)
I have a text file like this
...
B 16 1.340E+05
A 18 3.083E+02
Wu123 1.365E+02
...
I would like to get rid of the 7th character of each line if this is a space character.
Thank you,
Sarah (5 Replies)
Hi,
I need help regarding counting specific word or character per line and validate it against a specific number i.e 10. And if number of character equals the specific number then that line will be part of the output.
Specific number = 6
Specific word or char = ||
Sample data:... (1 Reply)
I have a file with different record length. The file as to be converted into fixed length by appending spaces at the end of record. The length should be calculated based on the record with maximum length in the file.
If the length is less than the max length, the spaces should be appended... (4 Replies)
I have a file: file.txt, which contains the following data in it.
This is a file, my name is Karl, what is this process, karl is karl junior, file is a test file, file's name is file.txt
My name is not Karl, my name is Karl Joey
What is your name?
Do you know your name and... (3 Replies)
Hi friend,
I have one file , and i want to read that file character by character.
I need this script in ksh.
while using read option with -n1 am getting error.
while read -n1 c read has bad option
And if i am using below script, then if in a line has space like this ( Pallvi mahajan)... (10 Replies)
Discussion started by: pallvi_mahajan
10 Replies
LEARN ABOUT DEBIAN
text::flow
Text::Flow(3pm) User Contributed Perl Documentation Text::Flow(3pm)NAME
Text::Flow - Flexible text flowing and word wrapping for not just ASCII output.
SYNOPSIS
use Text::Flow;
# use it on ASCII text ...
my $flow = Text::Flow->new(
check_height => sub {
my $paras = shift;
sum(map { scalar @$_ } @$paras) <= 10;
},
wrapper => Text::Flow::Wrap->new(
check_width => sub { length($_[0]) < 70 }
),
);
my @sections = $flow->flow($text);
# @sections will now be an array of strings, each string
# will contain no more than 10 lines of text each of which
# will be no longer then 70 characters long
# or use it on text in a PDF file ...
my $flow = Text::Flow->new(
check_height => sub {
my $paras = shift;
(sum(map { scalar @$_ } @$paras) * $pdf->get_font_height) < 200;
},
wrapper => Text::Flow::Wrap->new(
check_width => sub {
my $string = shift;
$pdf->get_string_width($string) < 100
},
)
);
my @sections = $flow->flow($text);
# @sections will now be an array of strings, each string
# will contain text which will fit within 200 pts and
# each line will be no longer then 100 pts wide
DESCRIPTION
This module provides a flexible way to wrap and flow text for both ASCII and non-ASCII outputs.
Another Text Wrap module!!?!?!
The main purpose of this module is to provide text wrapping and flowing features without being tied down to ASCII based output and fixed-
width fonts. My needs were for a more sophisticated text control in PDF and GIF output formats in particular.
METHODS
new (%params)
This constructs the new Text::Flow instance, and accepts parameters for the "wrapper" and "check_height" variables.
wrapper (?$wrapper)
This is the accessor for the internally help Text::Flow::Wrapper instance which is used by Text::Flow to wrap the individual lines.
check_height
This is the accessor for the CODE ref which is used to check the height of the current paragraph. It gets as an argument, an array-ref
of paragraphs, each of which is also an array-ref of text lines. The most common usage is shown in the SYNOPSIS above, but you can
really do anything you want with them. It is expected to return a Boolean value, true if the height is still okay, and false if the max
height has been reached.
flow ($text)
This method preforms the text flowing. It returns an array of strings which can be treated as complete blocks of text. It will handle
paragraph breaks and line breaks for you.
Introspection
meta
Returns the Moose meta object associated with this class.
TODO
I wanted to write some tests for using this with GD modules as well. I suppose we will have to wait until 0.02 for that.
SIMILAR MODULES
There are a bunch of other text wrapping and flowing modules out there, but they are all meant for use in ASCII outout only. This just
didn't work for my needs, so I wrote this one. If you need to wrap ASCII text and want to do it in a much simpler manner then this module
provides, then I suggest checking out those modules. This module is specifically made for when those other modules are no longer powerful
and flexible enough.
BUGS
All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to
cpan-RT.
AUTHOR
Stevan Little <stevan@iinteractive.com>
COPYRIGHT AND LICENSE
Copyright 2007 by Infinity Interactive, Inc.
<http://www.iinteractive.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.10.1 2007-05-21 Text::Flow(3pm)