|
|
Sponsored Content
Top Forums
Shell Programming and Scripting
Perl : Delete all files except few
Post 302885634 by gaurav99 on Monday 27th of January 2014 03:24:35 PM
01-27-2014
New to perl 
Not familiar with hashes
Not familiar with hashes|
|
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
I have several files in a specific directory.
A specific string in one file can occur in another files.
If this string is in other files. Then all the files in which this string occured should be deleted and only 1 file should remain with the string.
Example.
file1
ShortName "Blue... (2 Replies)
Discussion started by: premier_de
2 Replies
2. Shell Programming and Scripting
I have a local linux machine in which the files are dumped by a remote ubuntu server. If the process in remote server has any problem then empty files are created in local machine. Is there any way using perl script to check if the empty files are being created and delete them and then run a shell... (2 Replies)
Discussion started by: hussa1n
2 Replies
3. Shell Programming and Scripting
How to delete last row in the file in PERL.
file1 has
a.output
b.output
c.output
d.output
e.output
expected output is
a.output
b.output
c.output
d.output (1 Reply)
Discussion started by: adaleru
1 Replies
4. Shell Programming and Scripting
input:
donkey
monkey
dance
drink
output should be:
donkey
monkey (8 Replies)
Discussion started by: cola
8 Replies
5. Shell Programming and Scripting
Hi,
How to delete a file (if exists) using perl script.
I have used following script..
if ( -e $newfile) {
open (FILE, ">$newfile") || die "Cannot Open File\n";
print FILE;
close(FILE);
}
But it gives me error "Use of uninitialized value in print".
please help.
Thanks in... (1 Reply)
Discussion started by: arup1980
1 Replies
6. Shell Programming and Scripting
Hello All
I am implementing my task in Perl and i found an issue.
What i want to do is to remove files from the directory which were made 20 days back using Perl script (9 Replies)
Discussion started by: parthmittal2007
9 Replies
7. Shell Programming and Scripting
Need help creating a script to FTP files to a server and then delete the files that were transfered.
I am trying to FTP files to a Windows server through my Linux machine. I have setup the file transfer with no problems but am having problem deleting those files from the Linux box. My current non-working solution is below. Any ideas, anyone?? :wall: Please be gentle, I'm fairly new to this... (4 Replies)
Discussion started by: jmalfhs
4 Replies
8. Shell Programming and Scripting
Hi All,
I have written a script to check the file system usage and to delete the files which is consuming more space.Please check whether the script is corrcet
#Script Starts here
#!/usr/local/bin/perl
#Program to find the disk space and to delete the older files
#Checks the type of OS... (8 Replies)
Discussion started by: arunkarthick
8 Replies
9. Shell Programming and Scripting
Delete all files if another files in the same directory has a matching occurrence of a specific word
he following are the files available in my directory
RSK_123_20141113_031500.txt
RSK_123_20141113_081500.txt
RSK_126_20141113_041500.txt
RSK_126_20141113_081800.txt
RSK_128_20141113_091600.txt
Here, "RSK" is file prefix and 123 is a code name and rest is just timestamp of the file when its... (7 Replies)
Discussion started by: kridhick
7 Replies
10. Shell Programming and Scripting
Hi
My directory structure is as below.
dir1, dir2, dir3
I have the list of files to be deleted in the below path as below.
/staging/retain_for_2years/Cleanup/log $ ls -lrt
total 0
drwxr-xr-x 2 nobody nobody 256 Mar 01 16:15 01-MAR-2015_SPDBS2
drwxr-xr-x 2 root ... (2 Replies)
Discussion started by: prasadn
2 Replies
LEARN ABOUT REDHAT
perldelta
PERLDELTA(1) Perl Programmers Reference Guide PERLDELTA(1) NAME
perldelta - what is new for perl v5.8.1 DESCRIPTION
This document describes differences between the 5.8.0 release and the 5.8.1 release. Incompatible Changes Core Enhancements Tied Arrays with Negative Array Indices Formerly, the indices passed to "FETCH", "STORE", "EXISTS", and "DELETE" methods in tied array class were always non-negative. If the actual argument was negative, Perl would call FETCHSIZE implicitly and add the result to the index before passing the result to the tied array method. This behavior is now optional. If the tied array class contains a package variable named $NEGATIVE_INDICES which is set to a true value, negative values will be passed to "FETCH", "STORE", "EXISTS", and "DELETE" unchanged. Warnings Perl 5.8.0 forgot to add some deprecation warnings. These warnings have now been added. Pseudo-hashes really are deprecated Pseudo-hashes were deprecated in Perl 5.8.0 and will be removed in Perl 5.10.0, see perl58delta for details. Each attempt to access pseudo-hashes will trigger the warning "Pseudo-hashes are deprecated". If you really want to continue using pseudo-hashes but not to see the deprecation warnings, add: no warnings 'deprecated'; 5.005-style threads really are deprecated 5.005-style threads (activated by "use Thread;") were deprecated in Perl 5.8.0 and will be removed in Perl 5.10.0, see perl58delta for details. Each attempt to create a 5.005-style thread will trigger the warning "5.005 threads are deprecated". If you really want to con- tinue using 5.005 threads but not to see the deprecation warnings, add: no warnings 'deprecated'; Modules and Pragmata Utility Changes New Documentation Performance Enhancements Installation and Configuration Improvements Selected Bug Fixes New or Changed Diagnostics Changed Internals New Tests Known Problems Platform Specific Problems Reporting Bugs If you find what you think is a bug, you might check the articles recently posted to the comp.lang.perl.misc newsgroup and the perl bug database at http://bugs.perl.org/ . There may also be information at http://www.perl.com/ , the Perl Home Page. If you believe you have an unreported bug, please run the perlbug program included with your release. Be sure to trim your bug down to a tiny but sufficient test case. Your bug report, along with the output of "perl -V", will be sent off to perlbug@perl.org to be analysed by the Perl porting team. SEE ALSO
The Changes file for exhaustive details on what changed. The INSTALL file for how to build Perl. The README file for general stuff. The Artistic and Copying files for copyright information. perl v5.8.0 2003-02-18 PERLDELTA(1)