|
#!/usr/bin/perl
require "util-lib-5-5-a.pl";
my $config_file = '/Webs/deathtaxrepeal.com/cgi-sec/general_assembly/config/config.xml';
my $in = &read_parse();
my $xml = &extract_items($config_file);
my $cfg = $xml->{'CONFIG'} if(exists $xml->{'CONFIG'});
print "Content-type: text/html\n\n";
my $view = &get_top($cfg, $in);
if(%$view){
my $db = join($cfg->{'FILE_SEP'},$cfg->{'BASE_DIR'},$cfg->{'CGI_SEC'},$cfg->{'PROGRAM'},$cfg->{'MAIN'},$cfg->{'MAIN_FILE'});
my $c = &extract_obj($db, $view->{'ID'});
my $obj = $c->{$view->{'ID'}};
print "".&post_filter('MONTH_CONVERT', $obj->{'MONTH'})." ".$obj->{'DAY'}.", ".$obj->{'YEAR'}."\n";
print " \n";
print " ".$obj->{'HEADLINE'}."\n";
print "\n";
print "".$obj->{'BODY'}."\n";
print " \n";
}
sub get_top{
my($cfg, $in) = @_;
my $db = join($cfg->{'FILE_SEP'},$cfg->{'BASE_DIR'},$cfg->{'CGI_SEC'},$cfg->{'PROGRAM'},$cfg->{'MAIN'},$cfg->{'VIEW_FILE'});
my $tmp = {};
eval{
open(FILE, "<$db") || die "Could not open file: $db";
my $line = '';
if($line = ){
chomp($line);
$tmp = &create_obj($cfg->{'ELEMENTS'}, [split(/\t/, $line)]);
}
close(FILE);
};
return $tmp;
}
Visit our updated website to learn more about how the Death Tax impacts family farmers, business owners and economic growth, visit www.deathtaxrepeal.com
More Updates:
- August 28, 2006
Virginia to Repeal Death Tax
Read More
- August 09, 2006
Final Vote to Repeal Death Tax August 28
Read More
- July 20, 2006
Death Tax Repeal Update
Read More
- July 07, 2006
Death Tax Repeal Endorsed By Governor Kaine
Read More
- June 28, 2006
Bipartisan Endorsement to Repeal Death Tax
Read More
- June 26, 2006
Death Tax Repeal En Route to Approval
Read More
- June 20, 2006
House of Delegates Once Again
Votes to Repeal Virginia's Death Tax
Read More
- June 19, 2006
Senate Endorses Tax Relief for Farmers and Small Businesses
Read More
- June 17, 2006
Senate and House Leadership Endorse Full Death Tax Repeal
Read More
- June 09, 2006
Delegate Ed Scott: Repeal Virginia's Death Tax
Read More
- May 16, 2006
Tax Collections Continue to Grow
Repeal of the Death Tax is More than Affordable
Read More
- May 05, 2006
Virginia Death Tax Update
Read More
- April 25, 2006
General Assembly Update
Read More
- March 17, 2006
State Tax Collections Grow Over 10 Percent
Read More
- March 12, 2006
General Assembly Goes Into Overtime
Read More
- March 10, 2006
Final Days for the Death Tax?
Read More
- March 03, 2006
In the News
Read More
- March 02, 2006
General Assembly Update
Read More
- February 28, 2006
Senate Finance Committee Approves Partial Repeal of the Death Tax
Read More
- February 27, 2006
House Finance Committee Votes for FULL Death Tax Repeal
Read More
- February 24, 2006
Problems with Partial Repeal
Read More
- February 24, 2006
General Assembly Update
Read More
- February 22, 2006
General Assembly Alert
Read More
- February 17, 2006
Senator Norment Succeeds in Senate Passage of Death Tax Repeal Measure
Read More
- February 15, 2006
General Assembly Update
Read More
- February 03, 2006
House Overwhelmingly Endorses Tax Relief for Farmers & Small Businesses
Read More
- February 02, 2006
House Overwhelmingly Endorses Tax Relief for Farmers & Small Businesses
Read More
- February 01, 2006
2006 Virginia General Assembly Session Update - February 1
Read More
- January 31, 2006
2006 Virginia General Assembly Session Update - January 31
Read More
- January 20, 2006
2006 Virginia General Assembly Session Update - January 20
Read More
|
