FILEONE = /<filepath1>/<filename1.txt>
FILENEW = /<filepath2>/<filename2.txt>
head -5 $FILEONE | sed '1d' > $FILENEW[/CODE]
Print four lines starting from line 2?
This can probably be abbreviated but if you are building a larger script, you will probably need roughly these pieces.
Quote:
Create a space-separated value based on the second field of the lines in a file? This is not quite as natural in Perl but also not hard to do. I sort of fail to see any common use case for this, though.
Notice the use of an array to collect the values, and then a simple transform on it when you're done.
If you want to merge this with the first loop over file1, you can do something like
Last edited by era; 03-25-2008 at 02:47 PM..
Reason: Merging the two loops; fix indexing error (duh)
Guys I am new to this forum, this may seem like a cheeky request.
I have been asked by my manager to convert this ksh script to Perl. I do not have the foggiest about Perl and would appreciate any help on this.
Basically this scipt automates a recovery process for EMC Legato Networker. It will... (1 Reply)
Good afternoon to you all
I really need your help
I have the following script developed in .sh and I need to convert it into perl. Can someone help me do it please?
Here´s the script:
##############################################
##############################################
... (3 Replies)
Hi all,
Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM.
Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers.
At the moment am... (3 Replies)
Input file (a list of input file name with *.txt extension):
campus.com_icmp_ping_alive.txt
data_local_cd_httpd.txt
data_local_cd.txt
new_local_cd_mysql.txt
new_local_cd_nagios_content.txt
Desired output file:
data local_cd_httpd
data local_cd
new local_cd_mysql
new ... (9 Replies)
Hello,,I have a very small script that contains these lines; and it works perfectly; however I need to use Perl now as I will need to feel variables from a MySQL table into this; to it would be nice to start by converting this first...
find / -perm 777 \( -type f -o -type d \) -exec ls -lid {}... (1 Reply)
Hi,
Can someone convert the code into perl ?
x=(a b c)
y=(d e)
times=$((${#x} * ${#y}))
((xi=yi=0))
for((i=1;i<=times;i++,xi++,yi++))
do
if((xi>${#x}-1));then xi=0;fi
if((yi>${#y}-1));then yi=0;fi
print ${x},${y}
done (4 Replies)
Hello Guy's
Quick question which im sure many can answer in seconds. Basically I have a perl script which is running commands to an element and then taking some of the
the output and printing it to the screen. One of the outputs is a variable Hex Number. What I would like to do is strip... (1 Reply)
Hello, I need to get few values from a XML file and output needs to be written in another file with pipe delimited format. The Header & Footer of the Pipe Delimited file will be constant.
The below is my sample XML file. I need to pull the values in between the XML tags <Operator_info to... (15 Replies)
There is a python script that I would like converted to a perl script. If someone has the time to convert the script I would appreciate it. You can find the script below:
reboot-mb8600/reboot-mb8600.py at master . j4m3z0r/reboot-mb8600 . GitHub
#!/usr/bin/python
'''
A hacky script to... (1 Reply)
Discussion started by: azdps
1 Replies
LEARN ABOUT V7
join
JOIN(1) General Commands Manual JOIN(1)NAME
join - relational database operator
SYNOPSIS
join [ options ] file1 file2
DESCRIPTION
Join forms, on the standard output, a join of the two relations specified by the lines of file1 and file2. If file1 is `-', the standard
input is used.
File1 and file2 must be sorted in increasing ASCII collating sequence on the fields on which they are to be joined, normally the first in
each line.
There is one line in the output for each pair of lines in file1 and file2 that have identical join fields. The output line normally con-
sists of the common field, then the rest of the line from file1, then the rest of the line from file2.
Fields are normally separated by blank, tab or newline. In this case, multiple separators count as one, and leading separators are dis-
carded.
These options are recognized:
-an In addition to the normal output, produce a line for each unpairable line in file n, where n is 1 or 2.
-e s Replace empty output fields by string s.
-jn m Join on the mth field of file n. If n is missing, use the mth field in each file.
-o list
Each output line comprises the fields specifed in list, each element of which has the form n.m, where n is a file number and m is a
field number.
-tc Use character c as a separator (tab character). Every appearance of c in a line is significant.
SEE ALSO sort(1), comm(1), awk(1)BUGS
With default field separation, the collating sequence is that of sort -b; with -t, the sequence is that of a plain sort.
The conventions of join, sort, comm, uniq, look and awk(1) are wildly incongruous.
JOIN(1)