02-22-2009
hey thanx for your suggestions
I do agree what u said. it's working now
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi,
Here is my problem.. i have 2 files (file1, file2).. i have wrote the last two lines and first 4 lines of "file2" into two different variables .. say..
my $firstrec = `head -4 $file2`;
my $lastrec = `tail -2 $file2`;
and i write the rest of the file2 to a tmpfile and cat it with head... (2 Replies)
Discussion started by: meghana
2 Replies
2. Shell Programming and Scripting
I have a file like this:
host1,neighbor1
host3,neighbor4
host2,neighbor1
host2,neighbor3
host1,neighbor3
host3,neighbor1
host1,neighbor2
host3,neighbor2
I need some PERL magic that will generate output like this:
host1,neighbor1,neighbor3,neighbor2
host2,neighbor1,neighbor3... (3 Replies)
Discussion started by: stateful
3 Replies
3. Shell Programming and Scripting
Hi,
I have a requirement for creating a Perl Script which will perform Data Import process in an automated way and I am elaborating herewith :
Section 1 )
- use the following command line format :
"./import.pl -h hostname -p port -f datafile.txt"
Section 2)
datafile.txt will... (3 Replies)
Discussion started by: scott_apc
3 Replies
4. Shell Programming and Scripting
Below is my perl script:
#!/usr/bin/perl
open(FILE,"$ARGV") or die "$!";
@DATA = <FILE>;
close FILE;
$join = join("",@DATA);
@array = split( ">",$join);
for($i=0;$i<=scalar(@array);$i++){
system ("/home/bin/./program_name_count_length MULTI_sequence_DATA_FILE -d... (5 Replies)
Discussion started by: patrick87
5 Replies
5. Shell Programming and Scripting
I'm having trouble with this code.
if i do
.\read.pl -u user
it prints out
2010-12-20 12:00:00 host1 <cmd>a
2010-12-20 12:00:01 host1 <cmd> <execute>
2010-12-20 12:00:02 host1 <cmd>b
2010-12-20 12:00:03 host1 <cmd>c
however, if i enter
.\read.pl -h host1
it should... (3 Replies)
Discussion started by: kpddong
3 Replies
6. Shell Programming and Scripting
Hello all,
I know this is Unix forum, but i also know that there are some experts here who can help me out with this situation;
I am loading a data file into oracle table using Perl script by calling sqlldr script.
It does not do anything, and no data is getting loaded.
Any help,... (2 Replies)
Discussion started by: msrahman
2 Replies
7. Shell Programming and Scripting
I have following result.log file (always has 2 lines) which I need to process,
cat result.log
name.cmd.method,"result","abc","xyz";
name="hello,mine.12345,"&"tree"&" xyz "&" tree "&" xyz",
data="way,"&" 1"&"rate-me"&"1"&"rate-me",str="",ret="";
now I need to extract the strings/data as... (4 Replies)
Discussion started by: perlDiva
4 Replies
8. Shell Programming and Scripting
Hi,
I have on Designdocument in that information is stored with in tabular format.I need Perlscript to read and write the datausing perl script?
Regards,
Ravi (0 Replies)
Discussion started by: toravi.pentaho
0 Replies
9. Shell Programming and Scripting
Hi,
I have a file with data in the following format
BOX
-1.000000 -1.000000 0.000000
30.00000 14.00000 0.1000000
0.000000 0.000000 0.000000
0.000000
0.000000
CYLINDER
3.595000 2.995000 0.000000
0.5100000 2.000000
Z
0.000000 0.000000
0.000000
I want to convert these files... (1 Reply)
Discussion started by: lost.identity
1 Replies
10. Shell Programming and Scripting
We have the data looks like below in a log file.
I want to generat files based on the string between two hash(#) symbol like below
Source:
#ext1#test1.tale2 drop
#ext1#test11.tale21 drop
#ext1#test123.tale21 drop
#ext2#test1.tale21 drop
#ext2#test12.tale21 drop
#ext3#test11.tale21 drop... (5 Replies)
Discussion started by: Sanjeev G
5 Replies
LEARN ABOUT DEBIAN
hash::case::preserve
Hash::Case::Preserve(3pm) User Contributed Perl Documentation Hash::Case::Preserve(3pm)
NAME
Hash::Case::Preserve - hash with enforced lower cased keys
INHERITANCE
Hash::Case::Preserve
is a Hash::Case
is a Tie::StdHash
SYNOPSIS
use Hash::Case::Preserve;
tie my(%cphash), 'Hash::Case::Preserve';
$cphash{StraNGeKeY} = 3;
print keys %cphash; # StraNGeKeY
print $cphash{strangekey}; # 3
print $cphash{STRANGEKEY}; # 3
DESCRIPTION
Hash::Case::Preserve extends Hash::Case, which lets you play various trics with hash keys. This extension implements a fake hash which is
case-insentive. The keys are administered in the casing as they were used: case-insensitive but case-preserving.
METHODS
Constructors
$obj->addHashData(HASH)
See "Constructors" in Hash::Case
$obj->addPairs(PAIRS)
See "Constructors" in Hash::Case
$obj->setHash(HASH)
See "Constructors" in Hash::Case
tie(HASH, 'Hash::Case::Preserve', [VALUES,] OPTIONS)
Define HASH to be case insensitive, but case preserving. The hash is initialized with the VALUES, specified as ref-array (passing a
list of key-value pairs) or ref-hash.
OPTIONS is a list of key/value pairs, which specify how the hash must handle preservation. Current options:
-Option--Default
keep 'LAST'
keep => 'FIRST' | 'LAST'
Which casing is the preferred casing? The FIRST appearance or the LAST. Only stores will affect the casing, deletes will undo the
definition. Defaults to LAST, which is slightly faster.
SEE ALSO
This module is part of Hash-Case distribution version 1.02, built on March 09, 2012. Website: http://perl.overmeer.net/hash-case/
LICENSE
Copyrights 2002-2003,2007-2012 by Mark Overmeer. For other contributors see ChangeLog.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See
http://www.perl.com/perl/misc/Artistic.html
perl v5.14.2 2012-03-09 Hash::Case::Preserve(3pm)