11-24-2009
Perl map doubt
Hello ,
Please can someone tell me what exactly happens when the below filehandler is chomped into an array and later mapped.
$lcpLog="logcopy\@".getTimestamp."\log";
open CFg ,"< $lcpcfg";
chomp(@cfg = <CFG>);
close CFG;
@cfg=grep { $_ ne ' ' } map { lc + (split /\s*\/\//) [0] } @cfg;
Please explain what happens in above line
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
hi all
i wrote a shell script which uses perl script my code is :
>cat filename | while read i
>do
>perl -e 'require "/home/scripts/abc.pl" ; abc("$i")'
>done
perl script used will simply check syntax of Cobol programs but it didn't work for me so i asked my colleague he suggested... (1 Reply)
Discussion started by: zedex
1 Replies
2. Shell Programming and Scripting
Dear friends,
I have two files. In first file first column ($1), i have numbers.
The second file containes, the same number in the fourth column($4).
I need a output file, matching the first file column 1 with second file column 4. The main thing is the output file lines will be sorted... (4 Replies)
Discussion started by: vasanth.vadalur
4 Replies
3. Shell Programming and Scripting
Anyone please say what is the difference between $var and ${var} in perl
Sometimes $var used and sometimes ${var} used in same program.
Thanks in Advance,
Prabhu
---------- Post updated at 09:34 AM ---------- Previous update was at 05:59 AM ----------
Any one please clarify (1 Reply)
Discussion started by: prsampath
1 Replies
4. Shell Programming and Scripting
Hi guys,
I'm trying to learn grep and map and having a little problem.
Let's say I have a file which contains:
Apple: abcdcabdadddbac
I want to replace any combinations of three of abcd, thus when I do this:
print grep {s/{3}/X/g} <F>; # will do the subtitution fine, output XXXX
... (1 Reply)
Discussion started by: new bie
1 Replies
5. Shell Programming and Scripting
Hi,
I have 2 arrays:
@names=qw(amith veena chaitra);
@files=qw(file.txt file1.txt file3.txt);
There is one to one relationship between names and files.
There needs to be mapping created between names and files.
The output should be like this:
amith --> file.txt
veena --->... (3 Replies)
Discussion started by: vanitham
3 Replies
6. Shell Programming and Scripting
Hi,
In the following perl code:
#!/usr/bin/perl -w
if (open(FILE, "< in_file")) {
while (<FILE>) {
chomp($_);
if ($_ =~ /patt$/) {
my $f = (split(" ", $_));
print "$f\n";
}
}
close FILE;
}
Why changing the "FILE" as... (4 Replies)
Discussion started by: royalibrahim
4 Replies
7. Shell Programming and Scripting
Hi,
Please help me to understand the following code:
perl -lne 'print if "$_ " =~ /(5 (?:\d+ ){5})\1/'
What the regular expression "?:" does?
Also, whether the expression "\1" is the same as in sed (i.e) printing the elements inside pair of parentheses? (3 Replies)
Discussion started by: royalibrahim
3 Replies
8. Shell Programming and Scripting
Hello All,
I am writing the below script where it will connect to database and returns the results.
#!/sw/gcm/perl510/bin/perl
use SybaseC;
&openConnection;
&loadvalues;
sub openConnection {
$dbproc = new SybaseC(SYDB}, $ENV{DBDFLTUSR}, $ENV{DBDFLTPWD});
if... (2 Replies)
Discussion started by: filter
2 Replies
9. Shell Programming and Scripting
I have a file like
file.
file.TODAY.THISYEAR
file.TODAY.LASTYEARI want to substitute the words in caps with their actual values so that output should look like
file.140805
file.140805.2014
file.140805.2013For this I am reading the file line bye line in an array and using multiple map... (1 Reply)
Discussion started by: sam05121988
1 Replies
10. Shell Programming and Scripting
Hello,
I have many folders under which there is always a file with the same name, which contains the data I need to process later. A perl oneliner was borrowed
perl -e 'print "gene_id\t", join("\t", map {/(.*)\//; $1} @ARGV),"\n";' *_test.trim/level.csvto make a header so that each column... (5 Replies)
Discussion started by: yifangt
5 Replies
LEARN ABOUT DEBIAN
abootimg
ABOOTIMG(1) General Commands Manual ABOOTIMG(1)
NAME
abootimg - manipulate Android Boot Images.
DESCRIPTION
Tool to read/write/update android boot images
SYNOPSIS
abootimg
-i <bootimg>
abootimg
-x <bootimg> [<bootimg.cfg> [<kernel> [<ramdisk> [<secondstage>]]]]
abootimg
-u <bootimg> [-c "param=value"] [-f <bootimg.cfg>] [-k <kernel>] [-r <ramdisk>] [-s <secondstage>]
abootimg
--create <bootimg> [-c "param=value"] [-f <bootimg.cfg>] -k <kernel> -r <ramdisk> [-s <secondstage>]
OPTIONS
-i print boot imgage informations
-x Extract a boot image
-u Update a boot image
--create
Create a boot image
Options for extracting boot images
bootimg
Existing bootimage to use
bootimg.cfg
Name for the bootimg.cfg file, defaults to bootimg.cfg
kernel Name for the kernel image, defaults to zImage
ramdisk
Name for the ramdisk image, defaults to initrd.img
secondstage
Name for the second-stage image, defaults to stage2.img
Options for updating and creating boot images
bootimg
Existing bootimage to use
-c param=value
Existing bootimage to use
-f <bootimg.cfg>
Update bootimg.cfg with the named file
-k <kernel>
Update kernel with the named file
-r <ramdisk>
Update ramdisk with the named file
-s <secondstage>
Update secondstage image with the named file
ABOOTIMG(1)