10-15-2013
I am getting same error ;
can't find the string terminator " ' " any where before EOF at -e line 1.
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
I'm trying to figure out how to build a small shell script that will find old .shtml files in every /tgp/ directory on the server and delete them if they are older than 10 days...
The structure of the paths are like this:
/home/domains/www.domain2.com/tgp/
/home/domains/www.domain3.com/tgp/... (1 Reply)
Discussion started by: Neko
1 Replies
2. UNIX for Dummies Questions & Answers
I have a text file with following content (3 lines)
filename : output.txt
first line:12/12/2008
second line:12/12/2008
third line:Y
I would like to know how we can replace 'Y' with 'N' in the 3rd line keeping 1st and 2nd lines same as what it was before.
I tried using cat output.txt... (4 Replies)
Discussion started by: santosham
4 Replies
3. Shell Programming and Scripting
Hi,
Please let me know how to find text and print text and its previous line. Please don't get irritated few days back I asked text and next line. I am using HP-UX 11.11
Thanks for your help. (6 Replies)
Discussion started by: kamranjalal
6 Replies
4. UNIX for Dummies Questions & Answers
hi,
I want to search all files in the current working direcotry and to print in comma (,) seperated output. But I have two patterns to search for.
Files will be in ABC20100508.DAT format.
Search should happen on the format (ABC????????.DAT) along with date(20100508).
I can do a
ls... (2 Replies)
Discussion started by: anandapani
2 Replies
5. Shell Programming and Scripting
Hello friends!
Help me pls to write correct awk and grep statements for my task:
I have got files with name filename.txt
It has such structure:
Start of file
FROM: address@domen.com (12...890) abc
DATE: 11/23/2009 on Std
SUBJECT: any subject
End of file
So, I must check,
if this file... (4 Replies)
Discussion started by: candyme
4 Replies
6. Shell Programming and Scripting
How can i grep for a pattern with wildcard using grep?
I want to identify all the lines that start with SAM and end in .PIPE
IN.TXT
SAM_HEADER.PIPE
SAM_DETAIL.PIPE
SAM_INVOICE.PIPE
Can i do something like
grep SAM*.PIPE IN.TXT (2 Replies)
Discussion started by: venky338
2 Replies
7. Shell Programming and Scripting
Practice folder contains many files and im interested in extracting file which starts with abc* ghi* xyz* . I need to do variety of operations for different files. if file starts with xyz* then i need to move to some destination otherwise some other destination. I am not able to make wildcard... (15 Replies)
Discussion started by: kumaar1986
15 Replies
8. Shell Programming and Scripting
Hi guys,
I have a text file named file1.txt that is formatted like this:
001 , ID , 20000
002 , Name , Brandon
003 , Phone_Number , 616-234-1999
004 , SSNumber , 234-23-234
005 , Model , Toyota
007 , Engine ,V8
008 , GPS , OFF
and I have file2.txt formatted like this:
... (2 Replies)
Discussion started by: An0mander
2 Replies
9. Shell Programming and Scripting
Hi
I have a set of input strings in a pattern as given below
string1 string2 string3 string4 string5
I need to search this sequence of strings from a file in such a way that the first two strings (string1 and string2) and last two strings (string4 and string5) should match with the... (8 Replies)
Discussion started by: my_Perl
8 Replies
10. Shell Programming and Scripting
Hello All,
I hope this is the right area. If not, Kindly let me know and I will report in the appropriate spot.
I am needing to find a search pattern that will make the * act as Wildcard in the search pattern instead of being literal.
The example I am using is bzgrep "to=<*@domain.com>"... (5 Replies)
Discussion started by: mancountry
5 Replies
LEARN ABOUT DEBIAN
poe::component::dbiagent::helper
DBIAgent::Helper(3pm) User Contributed Perl Documentation DBIAgent::Helper(3pm)
NAME
POE::Component::DBIAgent::Helper - DBI Query Helper for DBIAgent
SYNOPSYS
use Socket qw/:crlf/;
use POE qw/Filter::Line Wheel::Run Component::DBIAgent::Helper/;
sub _start {
my $helper = POE::Wheel::Run ->new(
Program => sub {
POE::Component::DBIAgent::Helper->run($self->{dsn},
$self->{queries}
);
},
StdoutEvent => 'db_reply',
StderrEvent => 'remote_stderr',
ErrorEvent => 'error',
StdinFilter => POE::Filter::Line->new(),
StdoutFilter => POE::Filter::Line->new( Literal => CRLF),
StderrFilter => POE::Filter::Line->new(),
)
or carp "Can't create new DBIAgent::Helper: $!
";
}
sub query {
my ($self, $query, $package, $state, @rest) = @_;
$self->{helper}->put(join '|', $query, $package, $state, @rest);
}
sub db_reply {
my ($kernel, $self, $heap, $input) = @_[KERNEL, OBJECT, HEAP, ARG0];
# $input is either the string 'EOF' or a Storable object.
}
DESCRIPTION
This is our helper routine for DBIAgent. It accepts queries on STDIN, and returns the results on STDOUT. Queries are returned on a row-
by-row basis, followed by a row consisting of the string 'EOF'.
Each row is the return value of $sth->fetch, which is an arrayref. This row is then passed to Storable for transport, and printed to
STDOUT. HOWEVER, Storable uses newlines ("
") in its serialized strings, so the Helper is designed to use the "network newline" pair CR
LF as the line terminator for STDOUT.
When fetch() returns undef, one final row is returned to the calling state: the string 'EOF'. Sessions should test for this value FIRST
when being invoked with input from a query.
Initialization
The Helper has one public subroutine, called "run()", and is invoked with two parameters:
The DSN
An arrayref of parameters to pass to DBI->connect (usually a dsn, username, and password).
The Queries.
A hashref of the form Query_Name => "$SQL". See POE::Component::DBIAgent for details.
BUGS
I have NO idea what to do about handling signals intelligently. Specifically, under some circumstances, Oracle will refuse to acknowledge
SIGTERM (presumably since its libraries are non-reentrant) so sometimes SIGKILL is required to terminate a Helper process.
AUTHOR
This module has been fine-tuned and packaged by Rob Bloodgood <robb@empire2.com>. However, most of the code came directly from Fletch
<fletch@phydeaux.org>, either directly (Po:Co:DBIAgent:Queue) or via his ideas. Thank you, Fletch!
However, I own all of the bugs.
This module is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
perl v5.10.1 2008-01-18 DBIAgent::Helper(3pm)