I want to retain specific number of backup files in a directory.for example i want to retain only two latest backup file in backup directory. If number of backup files is greater than this policy that it will delete oldest file.Please Tell me whether this is possible or not. (2 Replies)
Hello,
I have a file that looks like this:
num11 num12 num13 word1
num21 num22 num23 word2
num31 num32 num33 word3
.
.
.
I would like to search for the lines that contain a given number, but I need to narrow the search only to the first field, that means that the number has to... (4 Replies)
New to scripting.. think i need sed to do the following but need help.
have a properties files with variable i need to replace using substitution
for e.g in x.properties
xslt.root.dir=/apps1/test/cs.war/presentation/xsl
have a shell script with following
echo "Edit... (3 Replies)
Hi, I need to do a global search and replacement of a non-ascii character. Let me first give the background of my problem.
Very frequently, I need to copy set of references from different sources. Typically, a reference would like this:
Banumathy et al., 2002 G. Banumathy, V. Singh and U.... (1 Reply)
Hello all,
First of all, I could not made up a nice title what explains my problem in short,sorry for that already.
I have the next file which contains the following,
CREATE:ENTRY:\
DNAME,"referenceId=sondakika30,referenceId=User1,\
referenceId=Company,\
... (2 Replies)
Hi,
Ive spent ages trying to find an explanation for how to do this on the web, but now feel like I'm :wall:
I would like to change each occurence (there are many within my script) of the following:
to
in Vim. I know how to search and replace when it is just single lines... (2 Replies)
Hi,
I have a task of "encrypting" a file by replacing the numbers with another set of numbers. Sort of swapping the values, say:
1 = 5
2 = 8
3 = 7
4 = 1
5 = 9 and so on..
so if i have 12345, my output should be 58719.
problem is i get 98719 since after swapping 1 to 5, my sed... (7 Replies)
Dear Unix Forum Group Members,
Please do let me know how I can replace the double pipe with single pipe recursively on single record.
Sample Input Data:
DN set|Call prefix||| Called number address nature
0||| *789|||||||ALL number types
0||| 00||||||||ALL number types
10||... (5 Replies)
Hi,
I am looking for a solution to find files in a folder and subfolders.
Those files should be moved (some with spaces) when they were between 2015 Feb. 03 and 2014 Nov. 24.
find . -type f -newermt "2010-01-01" ! -newermt "2010-06-01"
I am working on a QNAP with a small busybox.... (2 Replies)
Discussion started by: krischeu
2 Replies
LEARN ABOUT OSX
devel::dwarn
Devel::Dwarn(3) User Contributed Perl Documentation Devel::Dwarn(3)NAME
Devel::Dwarn - return Dwarn @return_value
SYNOPSIS
use Devel::Dwarn;
return Dwarn some_call(...)
is equivalent to:
use Data::Dumper::Concise;
if (wantarray) {
my @return = some_call(...);
warn Dumper(@return);
return @return;
} else {
my $return = some_call(...);
warn Dumper($return);
return $return;
}
but shorter. If you need to force scalar context on the value,
use Devel::Dwarn;
return DwarnS some_call(...)
is equivalent to:
use Data::Dumper::Concise;
my $return = some_call(...);
warn Dumper($return);
return $return;
If you need to force list context on the value,
use Devel::Dwarn;
return DwarnL some_call(...)
is equivalent to:
use Data::Dumper::Concise;
my @return = some_call(...);
warn Dumper(@return);
return @return;
If you want to label your output, try DwarnN
use Devel::Dwarn;
return DwarnN $foo
is equivalent to:
use Data::Dumper::Concise;
my @return = some_call(...);
warn '$foo => ' . Dumper(@return);
return @return;
If you want to output a reference returned by a method easily, try $Dwarn
$foo->bar->{baz}->$Dwarn
is equivalent to:
my $return = $foo->bar->{baz};
warn Dumper($return);
return $return;
If you want to immediately die after outputting the data structure, every Dwarn subroutine has a paired Ddie version, so just replace the
warn with die. For example:
DdieL 'foo', { bar => 'baz' };
TIPS AND TRICKS
global usage
Instead of always just doing:
use Devel::Dwarn;
Dwarn ...
We tend to do:
perl -MDevel::Dwarn foo.pl
(and then in the perl code:)
::Dwarn ...
That way, if you leave them in and run without the "use Devel::Dwarn" the program will fail to compile and you are less likely to check it
in by accident. Furthmore it allows that much less friction to add debug messages.
method chaining
One trick which is useful when doing method chaining is the following:
my $foo = Bar->new;
$foo->bar->baz->Devel::Dwarn::DwarnS->biff;
which is the same as:
my $foo = Bar->new;
(DwarnS $foo->bar->baz)->biff;
SEE ALSO
This module is really just a shortcut for Data::Dumper::Concise::Sugar, check it out for more complete documentation.
perl v5.16.2 2011-01-20 Devel::Dwarn(3)