Search Results

Try


$ cat tmp
>C4603985
...

senhia83's script can be simplified a little bit to something like:
awk '
/^>/ { copy = ($0 ~ /^>stt/) }
copy' infile

As always, if you want to try this on a Solaris/SunOS system, change awk to...

You can try:

awk 'NF&&!/^C/{print ">"$0}' ORS="" RS=">"

Hello sa@@,

One more approach may help you, very slightly different from Don's and Senhia83's script. Enjoy learning :b:

awk '/^>stt/ {A=1} A{print} !/^>stt/ {A=0}' Input_file


Output will...

In other words you have no write permission in that directory...

Try this


awk '/assumption/{
st=$0; split($NF,arr,"[=;.]")
if(arr[2] in key){ print; next }
key[arr[2]]; $3="predictive"
sub ( /\.[0-9]*\;/, ";")
print; print st; next
...

That depends on the application being used.

The second is safer, in case one of your variables has spaces in it, but you have an extra space in there which will mess it up.

system("Detector -lib \"$source/version2/files/imread.txt\" -nolow...

Try (untested)awk '{print length ($0)}' RS=">" ORS=">" file

#!/usr/bin/env perl

open( $fh, "<", "file") or die "Cannot open file: $!\n";

while( my $line = <$fh>) {
chomp($line);
my @array = split /\s+/, $line; # split to get 3rd field
if (...

perl -lape 'if($F[2] eq assumption) {$_.="$/$_"; $_=~s/$F[2](.*?ID=\w+)\.\d/predictive\1/}' file

I am not sure I understand what you mean. The 2nd command does not replace but adds a "predictive" line:

$ sed 's/\(.*\)assumption\(.*\)\(ID=[^.]*\)[^;]*\(;.*\)/\1predictive\2\3\4\
&/' file...

You could try:
awk '$3=="assumption"{$0=$0 ORS $0; sub($3, "predictive")}1' fileBut you would also need to adjust the ID in the last column, no?

Perhaps sed:
sed...