I want to collect the characters from 1-10 and 20-30 from each line of the file and take them in a file in the following format.Can someone help me with this :
string1,string2
string1,string2
string1,string2
:
:
:
: (7 Replies)
i have textfiles that contain a series of lines that look like this:
string0 .................................................... column3a column4a
string1**384y0439 ..................................... column3b column4b... (2 Replies)
Hi all,
I have a directory containing many subdirectories each named like KOG#### where # represents any digit 0-9. There are several files in each KOG#### folder but the one I care about is named like KOG####_final.fasta. I am trying to write a script to copy all of the KOG####_final.fasta... (3 Replies)
Hi,
I've looked at a few existing posts on this, but they don't seem to work for my inputs.
I have a text file where I want to extract all the text between two strings, every time that occurs.
Eg my input file is
Anna said that she would fetch the bucket.
Anna and Ben moved the bucket.... (9 Replies)
Hi All,
I have a file whose common patter is like this:
.I 1
.U
87049087
.S
Some text here too
.M
This is a text
.T
Some another text here
.P
Name of the book
.W
Some lines of more text. This text needs to be extracted.
.A
more text goes here too
.I 2 (2 Replies)
Hi experts,
Ive got a text file which has the following text which will occur in this format at least one time:
+=========================>>
Some stuff that evreryone should knnow
other stufsjdokajkajokajda
aijhjajcdjajcisajcqsqdqwdqad
<<=========================+
It is likely that... (8 Replies)
Hi, the title isn't very descriptive but it'll be easier to explain what I need if I write out the coordinates from which I need to extract certain information:
ATOM 2521 C MAM X 61 44.622 49.357 12.584 1.00 0.00 C
ATOM 2522 H MAM X 61 43.644 49.102 12.205 ... (10 Replies)
Here is my task, I feel sure this can be accomplished with see/awk but can't seem to figure out how.
I have large flat file from which I need to extract every case of a pairing of characters (GG) in this case PLUS the previous 20 characters. The output should be a list (which I plan to make... (17 Replies)
Hi Team -
I hope everyone has been well!
I export a file from one of our source systems that gives me more information than I need. The way the file outputs, I need to extract certain strings at different positions on the file and echo them to another file.
I can do this in batch easily,... (2 Replies)
Discussion started by: SIMMS7400
2 Replies
LEARN ABOUT DEBIAN
app::nopaste
App::Nopaste(3pm) User Contributed Perl Documentation App::Nopaste(3pm)NAME
App::Nopaste - easy access to any pastebin
SYNOPSIS
use App::Nopaste 'nopaste';
my $url = nopaste(q{
perl -wle 'print "Prime" if (1 x shift) !~ /^1?$|^(11+?)1+$/' [number]
});
# or on the command line:
nopaste test.pl
=> http://pastebin.com/fcba51f
DESCRIPTION
Pastebins (also known as nopaste sites) let you post text, usually code, for public viewing. They're used a lot in IRC channels to show
code that would normally be too long to give directly in the channel (hence the name nopaste).
Each pastebin is slightly different. When one pastebin goes down (I'm looking at you, <http://paste.husk.org>), then you have to find a new
one. And if you usually use a script to publish text, then it's too much hassle.
This module aims to smooth out the differences between pastebins, and provides redundancy: if one site doesn't work, it just tries a
different one.
It's also modular: you only need to put on CPAN a App::Nopaste::Service::Foo module and anyone can begin using it.
INTERFACE
CLI
See the documentation in App::Nopaste::Command.
"nopaste"
use App::Nopaste 'nopaste';
my $url = nopaste(
text => "Full text to paste (the only mandatory argument)",
desc => "A short description of the paste",
nick => "Your nickname",
lang => "perl",
chan => "#moose",
private => 1, # default: 0
# this is the default, but maybe you want to do something different
error_handler => sub {
my ($error, $service) = @_;
warn "$service: $error";
},
warn_handler => sub {
my ($warning, $service) = @_;
warn "$service: $warning";
},
# you may specify the services to use - but you don't have to
services => ["Shadowcat", "Gist"],
);
print $url if $url;
The "nopaste" function will return the URL of the paste on success, or "undef" on failure.
For each failure, the "error_handler" argument is invoked with the error message and the service that issued it.
For each warning, the "warn_handler" argument is invoked with the warning message and the service that issued it.
SEE ALSO
WebService::NoPaste, WWW::Pastebin::PastebinCom::Create, Devel::REPL::Plugin::Nopaste
http://perladvent.org/2011/2011-12-14.html <http://perladvent.org/2011/2011-12-14.html>
AUTHOR
Shawn M Moore, "sartak@gmail.com"
COPYRIGHT AND LICENSE
Copyright 2008-2010 Shawn M Moore.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2011-12-15 App::Nopaste(3pm)