05-08-2011
very quick and accurate response, checked on awk and worked perfectly, many many thanks!
10 More Discussions You Might Find Interesting
1. UNIX for Advanced & Expert Users
When i do ls -ld RT_BP* i am getting the following list.
drwxrwx--- 2 user group 256 Oct 17 10:09 RT_BP809
drwxrwx--- 2user group 256 Oct 17 10:09 RT_BP809.O
drwxrwx--- 2 user group 256 Oct 17 10:09 RT_BP810
drwxrwx--- 2user group 256 Oct... (2 Replies)
Discussion started by: ukatru
2 Replies
2. Shell Programming and Scripting
Hi, guys. I have one question, hope somebody can give me a hand
I have a file called passwd, the contents of it arebelow:
***********************
...
goldsimj:x:5008:200:
goldsij2:x:5009:200:
whitej:x:5010:201:
brownj:x:5011:202:
goldsij3:x:5012:204:
greyp:x:5013:203:
...... (6 Replies)
Discussion started by: daikeyang
6 Replies
3. Shell Programming and Scripting
please can someone tell me what the following regrex means
grep "^aa*$" <file>
I thought this would match any word beginning with aa and ending with $, but it doesnt.
Thanks in advance
Calypso (7 Replies)
Discussion started by: Calypso
7 Replies
4. Shell Programming and Scripting
Hi,
I am executing a svnlook command to check to see if the following line exists. I need a regular expression to represent the line.
A /test/test1/qa/test2/index.html
A /test/test1/qa/test3/test.jpg
A /test/test1/qa/test3/test1.jpg
A /test/test1/qa/test4/test.swf
I just need to extract... (9 Replies)
Discussion started by: kminkeller
9 Replies
5. Shell Programming and Scripting
Hi,
Input file:
-13-
-1er-
-1xyz1-
-1xz12-
-2ab1-
-2ab2--
-143-
Code:
grep '^*\-' input.txt
Wrong output:
-13-
-1xyz1-
-2ab1-
-2ab2-- (4 Replies)
Discussion started by: dragon.1431
4 Replies
6. Shell Programming and Scripting
Hi I am having a file as shown below
FILE 1
TXDD00, TXDD01, TXDD02, TXDD03,
TXDD04, TXDD05, TXDD06, TXDD07,
TXDD08, TXDD09, TXDD10, TXDD11,
TXDD12, TXDD13, TXDD14, TXDD15,
TXDD16, TXDD17, TXDD18, TXDD19,
TXDDCLK, TXDJTAGAMPL0, TXDJTAGAMPL1,... (3 Replies)
Discussion started by: jaita
3 Replies
7. Programming
Hi all,
How am I read a file, find the match regular expression and overwrite to the same files.
open DESTINATION_FILE, "<tmptravl.dat" or die "tmptravl.dat";
open NEW_DESTINATION_FILE, ">new_tmptravl.dat" or die "new_tmptravl.dat";
while (<DESTINATION_FILE>)
{
# print... (1 Reply)
Discussion started by: jessy83
1 Replies
8. Shell Programming and Scripting
Hi ,
I have few lines like
A20120101.ANU.ZIP
A20120401.ABC.ZIP
A20120105.KJK.ZIP
A20120809.JUG.ZIP
A20120101.MAT.ZIP
B20120301.ANU.XIP
I want to filter by
1. Files starting with A and Ending With Z ( ^A.*.ZIP$)
2. And either ANU, or KJK or MAT in the file name.
Hope my... (6 Replies)
Discussion started by: Anupam_Halder
6 Replies
9. Shell Programming and Scripting
Hello,
one step in a shell script i am writing, involves Grep command to search a regular expression in a line an only print the string after the match
an example line is below
/logs/GRAS/LGT/applogs/lgt-2016-08-24/2016-08-24.8.log.zip:2016-08-24 19:12:48,602 ERROR... (9 Replies)
Discussion started by: Ramneekgupta91
9 Replies
10. UNIX for Beginners Questions & Answers
I want to track only below:
I am using below, but it doesn't work: (6 Replies)
Discussion started by: proactiveaditya
6 Replies
LEARN ABOUT DEBIAN
dancer::response
Dancer::Response(3pm) User Contributed Perl Documentation Dancer::Response(3pm)
NAME
Dancer::Response - Response object for Dancer
SYNOPSIS
# create a new response object
Dancer::Response->new(
status => 200,
content => 'this is my content'
);
Dancer::SharedData->response->status; # 200
# fetch current response object
my $response = Dancer::SharedData->response;
# fetch the current status
$response->status; # 200
# change the status
$response->status(500);
PUBLIC API
new
Dancer::Response->new(
status => 200,
content => 'my content',
headers => HTTP::Headers->new(...),
);
create and return a new Dancer::Response object
current
my $response = Dancer::SharedData->response->current();
return the current Dancer::Response object, and reset the object
exists
if ($response->exists) {
...
}
test if the Dancer::Response object exists
content
# get the content
my $content = $response->content;
my $content = Dancer::SharedData->response->content;
# set the content
$response->content('my new content');
Dancer::SharedData->response->content('my new content');
set or get the content of the current response object
status
# get the status
my $status = $response->status;
my $status = Dancer::SharedData->response->status;
# set the status
$response->status(201);
Dancer::SharedData->response->status(201);
set or get the status of the current response object
content_type
# get the status
my $ct = $response->content_type;
my $ct = Dancer::SharedData->response->content_type;
# set the status
$response->content_type('application/json');
Dancer::SharedData->response->content_type('application/json');
set or get the status of the current response object
pass
$response->pass;
Dancer::SharedData->response->pass;
set the pass value to one for this response
has_passed
if ($response->has_passed) {
...
}
if (Dancer::SharedData->response->has_passed) {
...
}
test if the pass value is set to true
halt
Dancer::SharedData->response->halt();
$response->halt;
halted
if (Dancer::SharedData->response->halted) {
...
}
if ($response->halted) {
...
}
header
# set the header
$response->header('X-Foo' => 'bar');
Dancer::SharedData->response->header('X-Foo' => 'bar');
# get the header
my $header = $response->header('X-Foo');
my $header = Dancer::SharedData->response->header('X-Foo');
get or set the value of a header
headers
$response->headers(HTTP::Headers->new(...));
Dancer::SharedData->response->headers(HTTP::Headers->new(...));
return the list of headers for the current response
headers_to_array
my $headers_psgi = $response->headers_to_array();
my $headers_psgi = Dancer::SharedData->response->headers_to_array();
this method is called before returning a PSGI response. It transforms the list of headers to an array reference.
perl v5.14.2 2012-01-28 Dancer::Response(3pm)