Based on your sample data, it seems that for every record that ends with "test.rec" you wish to make the change and all other lines are to be left as is. If that is correct, then this should work:
Code:
awk ' BEGIN { c=10000; }
/test.rec$/ { printf( "\\newplace\\%d.rec\n", c++ ); next; }
{ print; } ' input-file >output-file
Hi,
I'm using the command: sed -n '$=' $1 on a sh script on AIX.
This script is used to count the number of lines of files.
If the file has no lines at all the command doesn't return nothing.
I need the command to return 0 when the file has no lines at all.
How can I achieve this?
Best... (5 Replies)
Hi All,
I need help in manipulating the data in first column in a file.
The sample data looks like below,
Mon Jul 18 00:32:52 EDT 2011,NULL,UAT
Jul 19 2011,NULL,UAT
1] All field in the file are separated by ","
2] File is having weekly data extracted from database
3] For eg.... (8 Replies)
Hello all. I am a beginner UNIX user who is using UNIX to work on a bioinformatics project for my university.
I have a bit of a complicated issue in trying to use sed (or awk) to "find and replace" bases (letters) in a genetics data spreadsheet (converted to a text file, can be either... (3 Replies)
/bin/sed -n ';4757335,$ p' | wc -l
/bin/sed -n ';4757335,$ p' | egrep "Failed" | egrep -c "PM late arrrival"
how can i combine the above two sed commands into one? i want to count the number of lines between the specified line number and the end of the file. AND and i want to count how many... (5 Replies)
Hi
I know sed and awk has options to give range of line numbers, but
I need to replace pattern in specific lines
Something like
sed -e '1s,14s,26s/pattern/new pattern/' file name
Can somebody help me in this....
I am fine with see/awk/perl
Thank you in advance (9 Replies)
I want to count lines of a file using AWK (only) and not in the END part like this awk 'END{print FNR}' because I want to use it.
Does anyone know of a way?
Thanks a lot. (7 Replies)
Greetings. I have a three column file, and there are some numbers in the second column that are <1. However I need all numbers to be positive, thus need to replace all those numbers with just one. I feel like there must be a simple way to use awk to find these numbers and sed to replace but can't... (5 Replies)
i Have a file as following
view pz19a0c0/1000T_J_3MoDw9DSLh1ZsCubdua-LKOQmbtiVgkIsiMbSiwF467?sessionId=15451401994597121249
view pz19a0c0/100086X67pR0MwzWnhhSO6sAEoxeFMyhh-IIbUCCdxicaQM4FC9?sessionId=154514019945971212494898
view/cart ... (5 Replies)
Discussion started by: Raghuram717
5 Replies
LEARN ABOUT DEBIAN
http::oai::listrecords
HTTP::OAI::ListRecords(3pm) User Contributed Perl Documentation HTTP::OAI::ListRecords(3pm)NAME
HTTP::OAI::ListRecords - Provide access to an OAI ListRecords response
SYNOPSIS
my $r = $h->ListRecords(
metadataPrefix=>'oai_dc',
);
while( my $rec = $r->next ) {
print "Identifier => ", $rec->identifier, "
";
}
die $r->message if $r->is_error;
# Using callback method
sub callback {
my $rec = shift;
print "Identifier => ", $rec->identifier, "
";
};
my $r = $h->ListRecords(
metadataPrefix=>'oai_dc',
onRecord=>&callback
);
die $r->message if $r->is_error;
METHODS
$lr = new HTTP::OAI::ListRecords
This constructor method returns a new HTTP::OAI::ListRecords object.
$rec = $lr->next
Returns either an HTTP::OAI::Record object, or undef, if no more record are available. Use $rec->is_error to test whether there was an
error getting the next record.
@recl = $lr->record([$rec])
Returns the record list and optionally adds a new record or resumptionToken, $rec. Returns an array ref of HTTP::OAI::Records,
including an optional resumptionToken string.
$token = $lr->resumptionToken([$token])
Returns and optionally sets the HTTP::OAI::ResumptionToken.
$dom = $lr->toDOM
Returns a XML::DOM object representing the ListRecords response.
perl v5.12.4 2011-06-23 HTTP::OAI::ListRecords(3pm)