Syntactic Confectionery Delight | |
PerlMonks |
Re: Deleting lines prior to a date!by SamCG (Hermit) |
on May 09, 2006 at 14:18 UTC ( [id://548215]=note: print w/replies, xml ) | Need Help?? |
Look at Date::Calc for date arithmetic. You could print out only the lines you want to a separate file, then delete or back up the original.
----------------- s''limp';@p=split '!','n!h!p!';s,m,s,;$s=y;$c=slice @p1;so brutally;d;$n=reverse;$c=$s**$#p;print(''.$c^chop($n))while($c/=$#p)>=1;
In Section
Seekers of Perl Wisdom
|
|