#! /usr/bin/perl
use warnings;
use strict;
my (@x, @y, $line);
open SOURCE, "< source.txt";
for $line (<SOURCE>) {
if ($line =~ /^# >/) {
@x = split /\s+/, $line;
$x[1] =~ s/>//;
open DEST, ">> output.txt";
print DEST "$line";
close DEST;
next;
}
else {
@y = split /\t/, $line;
$y[0] =~ s/$y[0]/$x[1]/;
open DEST, ">> output.txt";
print DEST join "\t", @y;
close DEST;
}
}
close SOURCE;
source.txt:
------------------
# >length=1
seq program data 909 1992
seq program record 909 1190
# >length=2
seq program data 909 1992
seq program record 909 1190
output.txt:
-------------------
# >length=1
length=1 program data 909 1992
length=1 program record 909 1190
# >length=2
length=2 program data 909 1992
length=2 program record 909 1190
Hi,
variable1="This is a car"
Now I want to replace the content of variable1, "car" to "dog". Is there any simple command I can use.
Thanks.
Joseph (4 Replies)
Hi Experts,
I have binary files contain an ID Line as:
:
:
$Header: FNDSCMON.fmb 115.6 2000/01/11 10:26:10 pkm ship$
:
:
where the ID Line format is:
$Header: <File_Name> <Version> <Last_update_date_time> pkm ship$
In this Example:
File_Name = FNDSCMON.fmb
Version = 115.6... (13 Replies)
Hi All,sorry for inconvience....please find the attachement for my question i am unable to paste the question here....please help me in slving thisthanksk.k (4 Replies)
My input:
Data name: ABC001
Data length: 1000
Detail info
Data Direction Start_time End_time Length
1 forward 10 100 90
1 forward 15 200 185
2 reverse 50 500 450
Data name: XFG110
Data length: 100
Detail info
Data Direction Start_time End_time Length
1 forward 50 100 50 ... (11 Replies)
Hi All,
I have two files one of which having some mobile numbers and corresponding value whose sample content as follows:
9058629605,8.0
9122828964,30.0
And in second file complete details of all mobile numbers and sample content as follows and delimeter used is comma(,):
... (8 Replies)
Hi,
I am having trouble while using 'sed' with reading files. Please help. I have 3 files. File A, file B and file C. I want to find content of file B in file A and replace it by content in file C.
Thanks a lot!!
Here is a sample of my question.
e.g. (file A: a.txt; file B: b.txt; file... (3 Replies)
I have a wordpress site. I need add "post_title" to all my "post_content" mysql field. Thanks.
my content: Free <b>Online Tips</b> output:Free post_title <b>Online Tips</b>:
This code does not work:
UPDATE wp_posts SET post_content = REPLACE ( post_content, 'Free <b>Online... (0 Replies)
Hello all ; )
I'got a file1 with a lot of emails like :
fistname.lastname@domaine1.comAnd another file2 with emails like
fistname.lastname@domaine2.ct.netI need a shell script that will read each line from the file1 and try to find if in file2 the fistname.lastname exist.
If yes, the... (1 Reply)
Discussion started by: Aswex
1 Replies
LEARN ABOUT DEBIAN
shorewall6-tcfilters
SHOREWALL6-TCFILTER(5) [FIXME: manual] SHOREWALL6-TCFILTER(5)NAME
tcfilters - shorewall6 u32 classifier rules file
SYNOPSIS
/etc/shorewall6/tcfilters
DESCRIPTION
Entries in this file cause packets to be classified for traffic shaping.
Beginning with Shorewall 4.4.15, the file may contain entries for both IPv4 and IPv6. By default, all rules apply to IPv6 but that can be
changed by inserting a line as follows:
IPV4
Following entries apply to IPv4.
IPV6
Following entries apply to IPv6
ALL
Following entries apply to both IPv4 and IPv6. Each entry is processed twice; once for IPv4 and once for IPv6.
The columns in the file are as follows (where the column name is followed by a different name in parentheses, the different name is used in
the alternate specification syntax).
CLASS - interface:class
The name or number of an interface defined in shorewall6-tcdevices[1](5) followed by a class number defined for that interface in
shorewall6-tcclasses[2](5).
SOURCE - {-|address}
Source of the packet. May be a host or network address. DNS names are not allowed.
DEST - {-|address}}
Destination of the packet. May be a host or network address. DNS names are not allowed.
PROTO - {-|protocol-number|protocol-name|all}
Protocol.
DEST PORT (dport) - [-|port-name-or-number]
Optional destination Ports. A Port name (from services(5)) or a port number; if the protocol is icmp, this column is interpreted as the
destination icmp-type(s).
SOURCE PORT (sport) - [-|port-name-or-number]
Optional source port.
TOS - [-|tos]
Optional - specifies the value of the TOS field. The tos value can be any of the following:
o tos-minimize-delay
o tos-maximuze-throughput
o tos-maximize-reliability
o tos-minimize-cost
o tos-normal-service
o hex-number
o hex-number/hex-number
The hex-numbers must be exactly two digits (e.g., 0x04)x.
LENGTH - [-|number]
Optional. Must be a power of 2 between 32 and 8192 inclusive. Packets with a total length that is strictly less than the specified
number will match the rule.
EXAMPLE
Example 1:
Place all 'ping' traffic on interface 1 in class 10. Note that ALL cannot be used because IPv4 ICMP and IPv6 ICMP are two different
protocols.
#CLASS SOURCE DEST PROTO DEST
# PORT
IPV4
1:10 0.0.0.0/0 0.0.0.0/0 icmp echo-request
1:10 0.0.0.0/0 0.0.0.0/0 icmp echo-reply
IPV6
1:10 ::/0 ::/0 icmp6 echo-request
1:10 ::/0 ::/0 icmp6 echo-reply
FILES
/etc/shorewall6/tcfilters
SEE ALSO
http://shorewall.net/traffic_shaping.htm
http://shorewall.net/MultiISP.html
http://shorewall.net/PacketMarking.html
NOTES
1. shorewall6-tcdevices
http://www.shorewall.net/manpages6/shorewall6-tcdevices.html
2. shorewall6-tcclasses
http://www.shorewall.net/manpages6/shorewall6-tcclasses.html
[FIXME: source] 06/28/2012 SHOREWALL6-TCFILTER(5)