Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Putting two perl scripts together... triming whitespace off of recently parsed file
Top Forums Shell Programming and Scripting Putting two perl scripts together... triming whitespace off of recently parsed file Post 302566559 by Astrocloud on Thursday 20th of October 2011 03:26:38 PM
Old 10-20-2011
Putting two perl scripts together... triming whitespace off of recently parsed file
Thanks to people's help, I have composed a single line within a .sh script that Ports a file into a csv:

perl -p -i -e 's/^(.{11})(.{6})(.{1})(.{2})(.{2})(.{2})(.{16})(.{5})(.{9})(.{8})(.{16})(.{23})(.{2})(.{2})(.{2})/"$1","$2","$3","$4","$5","$6","$7","$8""$9","$10","$11","$12","$13","$14","$15"/g' < /home/myfile.txt >/home/myfile.csv

From the web I found this perl script that uses regular expressions to pull the white space (extra spaces) from a list.

Perl - Trim whitespaces > beginning and end

#!/usr/bin/perl -w
use strict;

my @strings = (" foo ", " bar ", " foo bar ");

for (1..100000) {
foreach my $string (@strings) {
$string =~ s/^\s+//;
$string =~ s/\s+$//;
}
}

Now, I believe I could kludge this together by reading in the newly created file as a string... however :would there be a better way of doing it?

In a language like Tcl I could just use the trim command on each element... but in Perl how would I do it?

More appropriately what is the "right way" of doing this?
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

ftp most recently modified file

Hi what is the most optimum way to ftp the most recently modified file starting with a particular string. i tried this ftp -n 2>logfile 1>&2 <<EOF open xxxxxx user xxxx xxxx prompt ls -ltr f* res !var=`tail -1 |awk { print $9 }'` bye EOF that gives... (6 Replies)
Discussion started by: ahmedwaseem2000
6 Replies

2. Shell Programming and Scripting

Running many PERL scripts in one file

Hi, I have many PERL scripts in my system(Solaris 10 UNIX OS).I want to define all scripts in one file and run.Please suggest how to define. (3 Replies)
Discussion started by: sudhakaryadav
3 Replies

3. Shell Programming and Scripting

Updating a CSV file by multiple PERL scripts

Hi Friends, I'm writing code to update a CSV file by multiple PERL scripts. I've around 2000 PERL scripts which need to register their entries into a CSV file. Hence, I'm inserting following line code in all the 2000 PERL scripts. open(FILE,... (5 Replies)
Discussion started by: Lokesha
5 Replies

4. Shell Programming and Scripting

How to match (whitespace digits whitespace) sequence?

Hi Following is an example line. echo "192.22.22.22 \"33dffwef\" 200 300 dsdsd" | sed "s:\(\ *\ \):\1:" I want it's output to be 200 However this is not the case. Can you tell me how to do it? I don't want to use AWK for this. Secondly, how can i fetch just 300? Should I use "\2"... (3 Replies)
Discussion started by: shahanali
3 Replies

5. Shell Programming and Scripting

Search for a recently updated file

Hi, I am looking for a command to search for a specific file which was recently modified in the current directory leaving some unwanted files to be listed. For example, when I try ls - lrt it shows the following output. I want to ommit the files with the name 'resend' and... (3 Replies)
Discussion started by: svajhala
3 Replies

6. Shell Programming and Scripting

Perl program to simulate Least Recently Loaded paging

Hi, If I want to write perl program that simulated Least Recently Loaded(LRL) to calculate page fault: The user must input page access and number of page fram that need to be greater than 3 Example Page Access: 5, 3, 4, 1, 7, 5, 3, 2, 3, 6, 7, 1, 4, 6 Frames: 3 PA: 5 3 4 1 7 5 3 2 3 6... (6 Replies)
Discussion started by: guidely
6 Replies

7. Shell Programming and Scripting

Triming a string

Hi i have an input " load /appss/asdfas/... I want to take the string present between first / / i.e appss Input is "load /appss/asdfas/..." Expected output is appss Thanks in advance Ananth (9 Replies)
Discussion started by: Ananthdoss
9 Replies

8. Shell Programming and Scripting

Find and move files parsed from cvs file

I need help with a bash script. We have a directory of files which need to be renamed and moved to another directory based on filename information in a cvs file. The contents of the cvs file are as follows: A102345,abc123 A102347,dfg475 Where dfg475 is the basename without extension Our... (8 Replies)
Discussion started by: Lloyd Boyette
8 Replies

9. Shell Programming and Scripting

Putting s Perl module into your own script

Hi We have to create a perl script..for part of a project I ceated a script that called another perl module use AppUtil::VMUtil; But have been told that we need to incorpurate that module into my script...(with comments) Would you know how to copy or place a module from one script... (2 Replies)
Discussion started by: olearydc
2 Replies

10. UNIX for Beginners Questions & Answers

Triming the data in a file.

Hi, I have a big csv file with below data. file: La Cage Aux Folles (Widescreen) Famous Mystics and Psychics A Passion for Planning Financials Operations Marketing Management and Ethics Precious Moments Holy Bible New King James Version Precious Angels Edition Blue Practical Recording... (9 Replies)
Discussion started by: Raghuram717
9 Replies

LEARN ABOUT LINUX

alien::package::rpm

Alien::Package::Rpm(3pm)				User Contributed Perl Documentation				  Alien::Package::Rpm(3pm)

NAME

       Alien::Package::Rpm - an object that represents a rpm package

DESCRIPTION

       This is an object class that represents a rpm package. It is derived from Alien::Package.

FIELDS

       prefixes
	   Relocatable rpm packages have a prefixes field.

METHODS

       checkfile
	   Detect rpm files by their extention.

       install
	   Install a rpm. If RPMINSTALLOPT is set in the environement, the options in it are passed to rpm on its command line.

       scan
	   Implement the scan method to read a rpm file.

       unpack
	   Implement the unpack method to unpack a rpm file. This is a little nasty because it has to handle relocatable rpms and has to do a bit
	   of permissions fixing as well.

       prep
	   Prepare for package building by generating the spec file.

       cleantree
	   Delete the spec file.

       build
	   Build a rpm. If RPMBUILDOPT is set in the environement, the options in it are passed to rpm on its command line.

	   An optional parameter, if passed, can be used to specify the program to use to build the rpm. It defaults to rpmbuild.

       version
	   Set/get version.

	   When retreiving the version, remove any dashes in it.

       postinst
       postrm
       preinst
       prerm
	   Set/get script fields.

	   When retrieving a value, we have to do some truely sick mangling. Since debian/slackware scripts can be anything -- perl programs or
	   binary files -- and rpm is limited to only shell scripts, we need to encode the files and add a scrap of shell script to make it
	   unextract and run on the fly.

	   When setting a value, we do some mangling too. Rpm maintainer scripts are typically shell scripts, but often lack the leading shebang
	   line.  This can confuse dpkg, so add the shebang if it looks like there is no shebang magic already in place.

	   Additionally, it's not uncommon for rpm maintainer scripts to contain bashisms, which can be triggered when they are ran on systems
	   where /bin/sh is not bash. To work around this, the shebang line of the scripts is changed to use bash.

	   Also, if the rpm is relocatable, the script could refer to RPM_INSTALL_PREFIX, which is set by rpm at run time. Deal with this by
	   adding code to the script to set RPM_INSTALL_PREFIX.

       arch
	   Set/get arch field. When the arch field is set, some sanitizing is done first to convert it to the debian format used internally. When
	   it's retreived it's converted back to rpm form from the internal form.

AUTHOR

       Joey Hess <joey@kitenet.net>

perl v5.12.3							    2011-06-11						  Alien::Package::Rpm(3pm)
All times are GMT -4. The time now is 02:14 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy