Hi Guys,
I am trying to write a perl script to search a string "Name" in the file "FILE" and also want to create a new file and push the searched string Name line along with 10 lines following the same.
can anyone of you please let me know how to go about it ? (8 Replies)
continuing from my previous post, whose link is given below as a reference
https://www.unix.com/shell-programming-scripting/171076-shell-scripting.html#post302573569
consider there is create table commands in a file for eg:
CREATE TABLE `Blahblahblah` (
`id` int(11) NOT NULL... (2 Replies)
here is what i want to achieve... consider a file contains below contents. the file size is large about 60mb
cat dump.sql
INSERT INTO `table1` (`id`, `action`, `date`, `descrip`, `lastModified`) VALUES (1,'Change','2011-05-05 00:00:00','Account Updated','2012-02-10... (10 Replies)
I am attempting to grep an exact string from a series of files within a directory and append that output to the filename when it is present in the file. I've been after this all day with no luck. Thanks for your help in advance :wall:. (4 Replies)
Hi,
I am trying to remove lines once a string is found till another string is found including the start string and end string. I want to basically grab all the lines starting with color (closing bracket). PS: The line after the closing bracket for color could be anything (currently 'more').... (1 Reply)
Dear All
I am having a text file which is having more than 200 lines.
EX:
001010122 12000 BIB 12000 11200 1200003
001010122 2000 AND 12000 11200 1200003
001010122 12000 KVB 12000 11200 1200003
In the above file i want to search for string KVB... (5 Replies)
I have the logic below to look up for matches within the columns between the two files with awk.
In the if statement is where the string comparison is attempted with ==
The issue seems to be with the operands, as
1. when " '${SECTOR}' " -- double quote followed by single quote -- awk matches... (1 Reply)
I want to search a small string in a large string and find the locations of the string. For this I used grep "string" -ob <file name where the large string is stored>. Now this gives me the locations of that string. Now how do I store these locations in a text file.
Please use CODE tags as... (7 Replies)
I will start with an example of what I'm trying to do and then describe how I am approaching the issue.
File
PS028,005
Lexeme HRS # M #
PhraseType 1(1:1) 7(7)
PhraseLab 501 503
ClauseType ZYq0
PS028,005
Lexeme W # L> # BNH # M #... (17 Replies)
Discussion started by: jvoot
17 Replies
LEARN ABOUT DEBIAN
io::string
String(3pm) User Contributed Perl Documentation String(3pm)NAME
IO::String - Emulate file interface for in-core strings
SYNOPSIS
use IO::String;
$io = IO::String->new;
$io = IO::String->new($var);
tie *IO, 'IO::String';
# read data
<$io>;
$io->getline;
read($io, $buf, 100);
# write data
print $io "string
";
$io->print(@data);
syswrite($io, $buf, 100);
select $io;
printf "Some text %s
", $str;
# seek
$pos = $io->getpos;
$io->setpos(0); # rewind
$io->seek(-30, -1);
seek($io, 0, 0);
DESCRIPTION
The "IO::String" module provides the "IO::File" interface for in-core strings. An "IO::String" object can be attached to a string, and
makes it possible to use the normal file operations for reading or writing data, as well as for seeking to various locations of the string.
This is useful when you want to use a library module that only provides an interface to file handles on data that you have in a string
variable.
Note that perl-5.8 and better has built-in support for "in memory" files, which are set up by passing a reference instead of a filename to
the open() call. The reason for using this module is that it makes the code backwards compatible with older versions of Perl.
The "IO::String" module provides an interface compatible with "IO::File" as distributed with IO-1.20, but the following methods are not
available: new_from_fd, fdopen, format_write, format_page_number, format_lines_per_page, format_lines_left, format_name, format_top_name.
The following methods are specific to the "IO::String" class:
$io = IO::String->new
$io = IO::String->new( $string )
The constructor returns a newly-created "IO::String" object. It takes an optional argument, which is the string to read from or write
into. If no $string argument is given, then an internal buffer (initially empty) is allocated.
The "IO::String" object returned is tied to itself. This means that you can use most Perl I/O built-ins on it too: readline, <>, getc,
print, printf, syswrite, sysread, close.
$io->open
$io->open( $string )
Attaches an existing IO::String object to some other $string, or allocates a new internal buffer (if no argument is given). The posi-
tion is reset to 0.
$io->string_ref
Returns a reference to the string that is attached to the "IO::String" object. Most useful when you let the "IO::String" create an
internal buffer to write into.
$io->pad
$io->pad( $char )
Specifies the padding to use if the string is extended by either the seek() or truncate() methods. It is a single character and
defaults to "