Sponsored Content
Full Discussion: Using Perl to Rename File
Top Forums Shell Programming and Scripting Using Perl to Rename File Post 302351140 by bbbngowc on Monday 7th of September 2009 11:20:22 AM
Old 09-07-2009
Hi, thanks for the above code. It did work. However, now I need to add a series of letters to renamed files.

So I need to change the file from: ABCDEFG20090904024156.00565.txt
To: ABCDEFGZZZZZ00565.txt

Can I just add these letters to a spot on your code to get it to work? take out the "." and add ZZZZZ in it's place.

---------- Post updated at 10:18 AM ---------- Previous update was at 09:25 AM ----------

I think I got it:

Code:
foreach (<*.txt>)
{
rename($_, substr($_,0,7) . ($_,ZZZZZ) . substr($_,22));
}



---------- Post updated at 11:20 AM ---------- Previous update was at 10:18 AM ----------

Just one more thing Smilie

Need to drop the .txt extension.

Smilie
 

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

Help with multiple file rename - change case of part of file name

Hi there, I hope someone can help me with this problem : I have a directory (/var/www/file/imgprofil) which contains about 10000 JPG files. They have a naming convention thus : prefix-date-key-suffix.jpg they all have the prefix p-20050608- then AAAA is a 4 letter code the suffix is... (7 Replies)
Discussion started by: steve7
7 Replies

2. Shell Programming and Scripting

rename does not work in perl

#!/usr/bin/perl -w use POSIX qw(strftime); $PID = strftime "%Y%m%d%H%M%S", localtime; $filename = "original.list"; rename($filename,$filename.$PID)|| print "rename failed\n"; print $filename;The above code has no syntax error. But the renaming does not work. Anybody got a clue? (1 Reply)
Discussion started by: new2ss
1 Replies

3. Shell Programming and Scripting

perl rename failed

i have a file, which i want to rename, from my current directory to a backupdirectory. My perl code is below rename($s_filename,$backup.$s_filename ) all my variables are defined. but the rename failed. the file permission my file is "-rw-rw-r--". could this be a problem? I tried to use the... (9 Replies)
Discussion started by: new2ss
9 Replies

4. UNIX for Dummies Questions & Answers

Rename file based on first 3 characters of data in file

I'm looking to determine if I can use a grep command to read file and rename the file based on the first 3 characters of the data in the file. An example is: Read FileA If the first 3 positions of the data in the file are "ITP", then rename the file as FileA_ITP, else if the first 3... (3 Replies)
Discussion started by: jchappel
3 Replies

5. Shell Programming and Scripting

Perl script to rename file,error

#!/usr/bin/perl $FL="ch.txt"; $CFL="mytext.txt"; print "This script will rename textfiles."; mv $FL $CFL; print "Done."; perl file.pl Error: Can't locate object method "mv" via package "ch.txt" (perhaps you forgot to load "ch.txt"?) at file.pl line 7. (5 Replies)
Discussion started by: cola
5 Replies

6. HP-UX

[Solved] Unable to rename file in ftp server .Net:FTP perl

Hello All, I am trying to connect to ftp server and get the files. Also i need to rename the file in other ftp dir. rename method is not allowing me to rename the file in other dir. When i tried copy command by using net::FTP:FILE then perl says it is not installed. Can some body help me to... (2 Replies)
Discussion started by: krsnadasa
2 Replies

7. UNIX for Dummies Questions & Answers

look for specific values in a file and rename file with value found

Hi, i have a file with some data ..look for some specific value in the file and if found that value rename the file with the value found in the file.. ex.. File.txt 1236 43715825601ANDERSSON, 1236 437158256031963040120060901200609010000000 1236 43715825604123 MCCL AVE UPPER 1236 ... (11 Replies)
Discussion started by: dssyadav
11 Replies

8. UNIX for Dummies Questions & Answers

awk - Rename output file, after processing, same as input file

I have one input file ABC.txt and one output DEF.txt. After the ABC is processed and created output, I want to rename ABC.txt to ABC.orig and DEF to ABC.txt. Currently when I am doing this, it does not process the input file as it cannot read and write to the same file. How can I achieve this? ... (12 Replies)
Discussion started by: High-T
12 Replies

9. Shell Programming and Scripting

Rename specific file extension in directory with match to another file in bash

I have a specific set (all ending with .bam) of downloaded files in a directory /home/cmccabe/Desktop/NGS/API/2-15-2016. What I am trying to do is use a match to $2 in name to rename the downloaded files. To make things a more involved the date of the folder is unique and in the header of name... (1 Reply)
Discussion started by: cmccabe
1 Replies

10. Shell Programming and Scripting

Bash to copy file 3 times and rename based on another file

In the below bash I am trying to copy the only text file (always only one) in /home/cmccabe/Desktop/list/QC/metrics.txt and rename each of the 3 text files according to /home/cmccabe/Desktop/test/list.txt using lines 3, 4 ,5. This format (that is list.txt) is always 5 lines. Thank you :). ... (12 Replies)
Discussion started by: cmccabe
12 Replies
PERLBOOK(1)						 Perl Programmers Reference Guide					       PERLBOOK(1)

NAME
perlbook - Books about and related to Perl DESCRIPTION
There are many books on Perl and Perl-related. A few of these are good, some are OK, but many aren't worth your money. There is a list of these books, some with extensive reviews, at http://books.perl.org/ . We list some of the books here, and while listing a book implies our endorsement, don't think that not including a book means anything. Most of these books are available online through Safari Books Online ( http://safaribooksonline.com/ ). The most popular books The major reference book on Perl, written by the creator of Perl, is Programming Perl: Programming Perl (the "Camel Book"): by Larry Wall, Tom Christiansen, and Jon Orwant ISBN 978-0-596-00027-1 [3rd edition July 2000] http://oreilly.com/catalog/9780596000271/ The Ram is a cookbook with hundreds of examples of using Perl to accomplish specific tasks: The Perl Cookbook (the "Ram Book"): by Tom Christiansen and Nathan Torkington, with Foreword by Larry Wall ISBN 978-0-596-00313-5 [2nd Edition August 2003] http://oreilly.com/catalog/9780596003135/ If you want to learn the basics of Perl, you might start with the Llama book, which assumes that you already know a little about programming: Learning Perl (the "Llama Book") by Randal L. Schwartz, Tom Phoenix, and brian d foy ISBN 978-0-596-52011-3 [5th edition June 2008] http://oreilly.com/catalog/9780596520113 The tutorial started in the Llama continues in the Alpaca, which introduces the intermediate features of references, data structures, object-oriented programming, and modules: Intermediate Perl (the "Alpaca Book") by Randal L. Schwartz and brian d foy, with Tom Phoenix foreword by Damian Conway ISBN 978-0-596-00478-1 [1st edition March 2006] http://oreilly.com/catalog/9780596004781/ References You might want to keep these desktop references close by your keyboard: Perl 5 Pocket Reference by Johan Vromans ISBN 978-0-596-00374-6 [4th edition July 2002] http://oreilly.com/catalog/9780596003746/ Perl Debugger Pocket Reference by Richard Foley ISBN 978-0-596-00503-0 [1st edition January 2004] http://oreilly.com/catalog/9780596005030/ Regular Expression Pocket Reference by Tony Stubblebine ISBN 978-0-596-51427-3 [July 2007] http://oreilly.com/catalog/9780596514273/ Tutorials Beginning Perl by James Lee ISBN 1-59059-391-X [3rd edition April 2010] http://www.apress.com/book/view/1430227931 Learning Perl by Randal L. Schwartz, Tom Phoenix, and brian d foy ISBN 978-0-596-52010-6 [5th edition June 2008] http://oreilly.com/catalog/9780596520106 Intermediate Perl (the "Alpaca Book") by Randal L. Schwartz and brian d foy, with Tom Phoenix foreword by Damian Conway ISBN 0-596-10206-2 [1st edition March 2006] http://oreilly.com/catalog/9780596102067 Mastering Perl by brian d foy ISBN 978-0-596-10206-7 [1st edition July 2007] http://www.oreilly.com/catalog/9780596527242 Effective Perl Programming by Joseph N. Hall, Joshua A. McAdams, brian d foy ISBN 0-321-49694-9 [2nd edition 2010] http://www.effectiveperlprogramming.com/ Task-Oriented Writing Perl Modules for CPAN by Sam Tregar ISBN 1-59059-018-X [1st edition August 2002] http://www.apress.com/book/view/159059018X The Perl Cookbook by Tom Christiansen and Nathan Torkington with foreword by Larry Wall ISBN 1-56592-243-3 [2nd edition August 2003] http://oreilly.com/catalog/9780596003135 Automating System Administration with Perl by David N. Blank-Edelman ISBN 978-0-596-00639-6 [2nd edition May 2009] http://oreilly.com/catalog/9780596006396 Real World SQL Server Administration with Perl by Linchi Shea ISBN 1-59059-097-X [1st edition July 2003] http://www.apress.com/book/view/159059097X Special Topics Regular Expressions Cookbook by Jan Goyvaerts and Steven Levithan ISBN 978-0-596-52069-4 [May 2009] http://oreilly.com/catalog/9780596520694 Programming the Perl DBI by Tim Bunce and Alligator Descartes ISBN 978-1-56592-699-8 [February 2000] http://oreilly.com/catalog/9781565926998 Perl Best Practices by Damian Conway ISBN: 978-0-596-00173-5 [1st edition July 2005] http://oreilly.com/catalog/9780596001735 Higher-Order Perl by Mark-Jason Dominus ISBN: 1-55860-701-3 [1st edition March 2005] http://hop.perl.plover.com/ Mastering Regular Expressions by Jeffrey E. F. Friedl ISBN 978-0-596-52812-6 [3rd edition August 2006] http://oreilly.com/catalog/9780596528126 Network Programming with Perl by Lincoln Stein ISBN 0-201-61571-1 [1st edition 2001] http://www.pearsonhighered.com/educator/product/Network-Programming-with-Perl/9780201615715.page Perl Template Toolkit by Darren Chamberlain, Dave Cross, and Andy Wardley ISBN 978-0-596-00476-7 [December 2003] http://oreilly.com/catalog/9780596004767 Object Oriented Perl by Damian Conway with foreword by Randal L. Schwartz ISBN 1-884777-79-1 [1st edition August 1999] http://www.manning.com/conway/ Data Munging with Perl by Dave Cross ISBN 1-930110-00-6 [1st edition 2001] http://www.manning.com/cross Mastering Perl/Tk by Steve Lidie and Nancy Walsh ISBN 978-1-56592-716-2 [1st edition January 2002] http://oreilly.com/catalog/9781565927162 Extending and Embedding Perl by Tim Jenness and Simon Cozens ISBN 1-930110-82-0 [1st edition August 2002] http://www.manning.com/jenness Pro Perl Debugging by Richard Foley with Andy Lester ISBN 1-59059-454-1 [1st edition July 2005] http://www.apress.com/book/view/1590594541 Free (as in beer) books Some of these books are available as free downloads. Higher-Order Perl: http://hop.perl.plover.com/ Writing Perl Modules for CPAN: http://www.apress.com/resource/freeebook/9781590590188 Other interesting, non-Perl books You might notice several familiar Perl concepts in this collection of ACM columns from Jon Bentley. The similarity to the title of the major Perl book (which came later) is not completely accidental: Programming Pearls by Jon Bentley ISBN 978-0-201-65788-3 [2 edition, October 1999] More Programming Pearls by Jon Bentley ISBN 0-201-11889-0 [January 1988] A note on freshness Each version of Perl comes with the documentation that was current at the time of release. This poses a problem for content such as book lists. There are probably very nice books published after this list was included in your Perl release, and you can check the latest released version at http://perldoc.perl.org/perlbook.html . Some of the books we've listed appear almost ancient in internet scale, but we've included those books because they still describe the current way of doing things. Not everything in Perl changes every day. Many of the beginner-level books, too, go over basic features and techniques that are still valid today. In general though, we try to limit this list to books published in the past five years. Get your book listed If your Perl book isn't listed and you think it should be, let us know. perl v5.14.2 2011-09-26 PERLBOOK(1)
All times are GMT -4. The time now is 08:40 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy