06-06-2008
clear a file in PERL
Hi,
How can i clear the contents of a file in perl?
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
I want to clear or modify a line of a file. It is possible by
cat filename | sed '3d'
for example. But If I want "3" to be a variable?
I can't do sed '$var d'
Help me please
Thank you very much (1 Reply)
Discussion started by: Nene
1 Replies
2. UNIX for Advanced & Expert Users
Hai,
I have a program which updates the result in a log file, as the program runs 24*7,the size of log file keeps on increasing.
Can you help me with a shell command which will clear the content of a log file in use.
1) I tried tail -10 logfile > logfile ( the content is not changed )
2) >... (10 Replies)
Discussion started by: coolbhai
10 Replies
3. Linux
I have a log file on our system which fills up with lines that have been timestamped, as follows....
03/03/2008 10:56:06:815] (ERROR) balance: continuing session to genapp02 : 18500
03/03/2008 10:56:06:820] (ERROR) balance: continuing session to genapp02 : 18500
03/03/2008 10:56:07:003]... (2 Replies)
Discussion started by: davesimm
2 Replies
4. Shell Programming and Scripting
Hello,
I have a script which creates a certain text file.
Whenever I call it, I need to recreate this file, because I have no need in the previous content.
So I thought to remove the file every time I call the script, and that way I am sure that the previous content will not interrupt me.... (2 Replies)
Discussion started by: shira
2 Replies
5. Shell Programming and Scripting
Hi
can anyone suggest me how to write a file containing values,... say
19
20
21
22
..
40
to an array @array = (19, 20, ... 40)
-- Thanks (27 Replies)
Discussion started by: meghana
27 Replies
6. Shell Programming and Scripting
Any help appreciated
Thanks
sample input:
> (extra spaces&tabs in here) test1 (extra spaces&tabs in here) 123.123.123.123 (extra spaces&tabs in here) abc (extra spaces&tabs in here) 123
---
< (extra spaces&tabs in... (3 Replies)
Discussion started by: goofist
3 Replies
7. Shell Programming and Scripting
How can i print the output of a perl script on a unix console and redirect the same in a log file under same directory simultaneously ?
Like in Shell script, we use tee, is there anything in Perl or any other option ? (2 Replies)
Discussion started by: butterfly20
2 Replies
8. Shell Programming and Scripting
Hi,
I have a script which will use an input.txt file as an input file.
I am providing data to this input file in the script and once the script is executed, I want to clear all the contents of this file as during the second time use of this script, I'll be appending the data in this input... (5 Replies)
Discussion started by: pat_pramod
5 Replies
9. Shell Programming and Scripting
proc get_view_rel_str { } {
set cc_view :] end]]
puts $cc_view
set a
puts $a
set a end]]
puts $a
set a
puts $a
set a
puts $a
set a
puts $a
}
get_view_rel_str
this is a script in tcl with clearcase view (1 Reply)
Discussion started by: Syed Imran
1 Replies
10. UNIX for Dummies Questions & Answers
Hi,
I have a file with 15 fields seperated by '|'. The requirement is to clear the last 5 characters of the 14th field. modifications should be done to the original file .
Can some one help me in sorting this out. (2 Replies)
Discussion started by: sureshk_85
2 Replies
LEARN ABOUT DEBIAN
alzabo::changetracker
Alzabo::ChangeTracker(3pm) User Contributed Perl Documentation Alzabo::ChangeTracker(3pm)
NAME
Alzabo::ChangeTracker - Saves a set of changes as callbacks that can be backed out if needed
SYNOPSIS
use Alzabo::ChangeTracker;
my $x = 0;
my $y = 1;
sub foo
{
my $tracker = Alzabo::ChangeTracker->new;
$tracker->add( sub { $x = 0; } );
$x = 1;
bar();
eval { something; };
$tracker->backout if $@;
}
sub bar
{
my $tracker = Alzabo::ChangeTracker->new;
$tracker->add( sub { $y = 1; } );
$y = 2;
}
DESCRIPTION
The trick ...
We only want to have one object of this type at any one time. In addition, only the stack frame that created it should be able to clear it
(except through a backout). Why? Here's an example in pseudo-code to help explain it:
sub foo
{
create a tracker;
store some change info in the tracker;
call sub bar;
store some change info in the tracker;
# point Y
clear changes in tracker;
}
sub bar
{
create a tracker; # internally, we really just increment our stack count
store some change info in the tracker;
clear changes in tracker; # point X
}
If at point X we were to really clear out the changes, even the changes just from sub bar, we'd have a problem. Because if at point Y,
things go to hell and we want to back out the changes, we want to back out the changes from sub foo _AND_ sub bar. However, if bar is also
an entry point we want to be able to track changes in bar and clear them from bar.
AUTHOR
Dave Rolsky, <autarch@urth.org>
perl v5.8.8 2007-12-23 Alzabo::ChangeTracker(3pm)