I Know What the Red Clay Looks Like: The Voice and Vision of Black American Women Writers (Qty & Cn$ Are Paper)

Rebecca Carroll, Author Clarkson N Potter Publishers $22.5 (246p) ISBN 978-0-517-59638-8
EVAL ERROR: Global symbol "$Are" requires explicit package name at (eval 10902) line 65.

Code:
line 1: package tmpevalpackage;
line 2: sub doEval { 
line 3: 	use Business::ISBN qw(:all);
line 4:     use LWP::Simple;
line 5: 	use XML::Simple;
line 6: 	use HTML::Entities;
line 7: 
line 8: 
line 9: 	my($isbn_struct,$isbn10_string,$isbn13_string,$isbn10,$isbn13,$ASIN,$linetext);
line 10: 	my($has_ad, $box_style, $buy_amazon, $buy_apple, $buy_indiebound, $buy_powells, $buy_google, $buy_bandn, $drawer_style);
line 11: 
line 12: 	++$main::ENV{'buy_counter'};
line 13: 
line 14: 	my ($isbn) = "978-0-517-59638-8";
line 15: 	if("1"){
line 16: 		$has_ad = 1;
line 17: 	}
line 18: 
line 19: 	$linetext = "";
line 20: 	my $no_image = "";
line 21: 	if($linetext){
line 22: 		$box_style .= "display:none;position:absolute;z-index:99999;width:100px;";
line 23: 		$drawer_style .= "display:block;";
line 24: 	}
line 25: 	else{
line 26: 		$drawer_style .= "display:none;";
line 27: 	}
line 28: 
line 29: 	if($isbn =~ s/^ASIN(.+)/$1/){
line 30: 		$ASIN = 1;
line 31: 		$buy_amazon = "http://www.amazon.com/gp/product/$isbn/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 32: 	}
line 33: 	else{
line 34: 		$isbn_struct = Business::ISBN->new($isbn);
line 35: 		if($isbn_struct && $isbn_struct->is_valid){
line 36: 			$isbn10 = $isbn_struct->as_isbn10;
line 37: 			$isbn13 = $isbn_struct->as_isbn13;
line 38: 			$isbn10_string = $isbn10->as_string([]);
line 39: 			$isbn13_string = $isbn13->as_string([]);
line 40: 			$buy_amazon = "http://www.amazon.com/gp/product/$isbn10_string/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 41: 			$buy_apple = "http://itunes.apple.com/us/book/isbn$isbn13_string?at=10lvId";
line 42: 			$buy_indiebound = "http://www.indiebound.org/book/$isbn13_string?aff=PublishersWeekly";
line 43: 			$buy_powells = "http://www.powells.com/partner/41251/biblio/$isbn13_string?p_isbn";
line 44: 			$buy_google = "https://play.google.com/store/search?q=$isbn13_string&c=books&PAfiiliateID=11lwg2";
line 45: 
line 46: 			$buy_bandn = "http://www.anrdoezrs.net/click-7485766-11819508?url=http://www.barnesandnoble.com/w/?ean=$isbn13_string";
line 47: 
line 48: #			my $bnxml = get("https://pds.barnesandnoble.com/fetch-data-service/productAffiliate?ids=$isbn13_string");
line 49: #
line 50: #			if($bnxml){
line 51: #				my $xmlDoc = XML::Simple->new();
line 52: #				my $xmlHash = $xmlDoc->XMLin($bnxml);
line 53: #
line 54: #				if( $xmlHash->{'ProductAffiliateResult'}
line 55: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}
line 56: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'}){
line 57: #						$buy_bandn = "http://www.dpbolvw.net/click-4260421-11819508?url=" . $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'};
line 58: #				}
line 59: #			}
line 60: #
line 61: #			$buy_bandn = "http://click.linksynergy.com/deeplink?mid=36889&id=uWBQGnFbkjk&murl=http%3A%2F%2Fcart2.barnesandnoble.com%2FShop%2Fxt_manage_cart.asp%3Fean%3D$isbn13_string%26productcode%3DBK";
line 62: 
line 63: 		}
line 64: 	}
line 65: 	my $title = "I Know What the Red Clay Looks Like: The Voice and Vision of Black American Women Writers Qty & Cn$ Are Paper";
line 66: 
line 67: 	$title = encode_entities($title, '<>&":()[]');
line 68: 
line 69: 	if($linetext){
line 70: 		print "<span id=\"box_inline$main::ENV{'buy_counter'}\" class=\"buy-link\" onmouseover=\"\$(\'#buy-container$main::ENV{'buy_counter'}\').fadeIn(100);\" onmouseleave=\"dismissUnlessEnter('#buy-container$main::ENV{\"buy_counter\"}','#box_inline$main::ENV{\"buy_counter\"}')\";>$linetext</span>\n";
line 71: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" onmouseleave=\"\$(\'#buy-container$main::ENV{'buy_counter'}\').fadeOut(100);\" style=\"$box_style\">\n";
line 72: 	}
line 73: 	else{
line 74: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" style=\"$box_style\">\n";
line 75: 	}
line 76: 	if(!$no_image) {
line 77: 		print "
EVAL ERROR: Global symbol "$title" requires explicit package name at (eval 10904) line 11.

Code:
line 1: package tmpevalpackage;
line 2: sub doEval { 
line 3: 	my(@incoming,$isbn);
line 4: 
line 5: 	$main::ENV{'image_url'} = '';
line 6: 
line 7: 	@incoming = split(/,/,"$isbn");
line 8: 	$isbn = $incoming[0];
line 9: 	
line 10: 	$isbn =~ s/-//g;
line 11: 	$main::ENV{'image_alt_title'} = "$title";
line 12: 		 = "https://booklife.com/image-factory/http/localhost/amazongetcover/$isbn.jpg/w204.jpg";
line 13:  };
line 14: &doEval();
line 15: 1;
"; line 78: print "<div id=\"buy-box\">\n"; line 79: } line 80: else { line 81: print "<div id=\"buy-box\" style=\"width:100%;margin-top:10px;margin-bottom:20px;\">\n"; line 82: } line 83: print "<div id=\"buy-inner-box\" class=\"buy-box\">\n"; line 84: if($linetext){ line 85: print "<div class=\"buy-box-header\">Buy this book</div>\n"; line 86: } line 87: else{ line 88: print "<div class=\"buy-box-header\" onClick=\"\$(\'.buy-box-body$main::ENV{'buy_counter'}\').toggle(100);\">Buy this book</div>\n"; line 89: } line 90: print "<div class=\"buy-box-body$main::ENV{'buy_counter'}\" style=\"$drawer_style\">\n"; line 91: print "<div class=\"buy-box-item\">\n"; line 92: print "<a href=\"$buy_amazon\" target=\"_offsite\">Amazon</a>\n"; line 93: print "</div>\n"; line 94: if(!$ASIN){ line 95: if($buy_bandn){ line 96: print "<div class=\"buy-box-item\">\n"; line 97: print "<a href=\"$buy_bandn\" target=\"_offsite\">Barnes & Noble</a>\n"; line 98: print "</div>\n"; line 99: } line 100: #print "<div class=\"buy-box-item\">\n"; line 101: #print "<a href=\"$buy_google\" target=\"_offsite\">Google</a>\n"; line 102: #print "</div>\n"; line 103: print "<div class=\"buy-box-item\">\n"; line 104: print "<a href=\"$buy_apple\" target=\"_offsite\">iBooks</a>\n"; line 105: print "</div>\n"; line 106: print "<div class=\"buy-box-item\">\n"; line 107: print "<a href=\"$buy_indiebound\" target=\"_offsite\">IndieBound</a>\n"; line 108: print "</div>\n"; line 109: print "<div class=\"buy-box-item\">\n"; line 110: print "<a href=\"$buy_powells\" target=\"_offsite\">Powell's</a>\n"; line 111: print "</div>\n"; line 112: } line 113: print "</div>\n"; line 114: print "</div>\n"; line 115: print "</div>\n"; line 116: # if($has_ad && !$no_image){ line 117: # print "<div>\n"; line 118: # print "<div><a rel=\"nofollow\" href=\"https://www.publishersweekly.com/pw/link-tracker?action=click&id=8\"> </a><img src=\"https://www.publishersweekly.com/pw/link-tracker?action=impression&id=8\" width=\"1\" height=\"1\"></div>\n"; line 119: # print "<div class=\"quicklinks-ad\">ADVERTISEMENT</div>"; line 120: # print "<iframe src=\"//ads.ad-center.com/smart_ad/display?ref=5042105&q=KEYWORD&smart_ad_id=16481\" width=\"204\" height=\"70\" frameborder=\"0\" scrolling=\"no\" allowtransparency=\"true\"></iframe>\n"; line 121: # print "</div>\n"; line 122: # } line 123: print "</div>\n"; line 124: line 125: }; line 126: &doEval(); line 127: 1;
Unlike other recent collections of work by African American women, Carroll sets her anthology apart by putting excerpts by June Jordan, Gloria Naylor, Lorene Cary and others into context with short biographies and interviews that asks why they write, what they write, who they write for and who were their major influences. Unfortunately, the questions tend to elicit very similar answers from each author save Rita Dove, who discusses her feelings about being Poet Laureate. Most others say they have loved writing and reading since they were very young, they tend to write autobiographically-even when writing fiction-and most were influenced by the likes of Zora Neale Hurston and Toni Morrison. More interesting are the intimate discussion of the excerpt included: Nikki Giovanni explains how early on she wanted to write for people who didn't have a voice, which lends some insight into her poem about the strength and continuity of African women, ``Ego Tripping'' from The Women and the Men. J. California Cooper describes her decision to portray the destructiveness of drugs using a female character in ``Vanity'' from The Matter Is Life. ``It wasn't so much hard for me to write as it was hard for me to read. Consequently, I haven't read it but once.'' (Nov.)
Reviewed on: 10/31/1994
Release date: 11/01/1994
Hardcover - 978-0-517-17622-1
Hardcover - 246 pages - 978-0-517-88261-0
Hardcover - 978-0-517-28123-9
Show other formats
FORMATS
EVAL ERROR: Global symbol "$Are" requires explicit package name at (eval 10908) line 65.

Code:
line 1: package tmpevalpackage;
line 2: sub doEval { 
line 3: 	use Business::ISBN qw(:all);
line 4:     use LWP::Simple;
line 5: 	use XML::Simple;
line 6: 	use HTML::Entities;
line 7: 
line 8: 
line 9: 	my($isbn_struct,$isbn10_string,$isbn13_string,$isbn10,$isbn13,$ASIN,$linetext);
line 10: 	my($has_ad, $box_style, $buy_amazon, $buy_apple, $buy_indiebound, $buy_powells, $buy_google, $buy_bandn, $drawer_style);
line 11: 
line 12: 	++$main::ENV{'buy_counter'};
line 13: 
line 14: 	my ($isbn) = "978-0-517-59638-8";
line 15: 	if("1"){
line 16: 		$has_ad = 1;
line 17: 	}
line 18: 
line 19: 	$linetext = "";
line 20: 	my $no_image = "";
line 21: 	if($linetext){
line 22: 		$box_style .= "display:none;position:absolute;z-index:99999;width:100px;";
line 23: 		$drawer_style .= "display:block;";
line 24: 	}
line 25: 	else{
line 26: 		$drawer_style .= "display:none;";
line 27: 	}
line 28: 
line 29: 	if($isbn =~ s/^ASIN(.+)/$1/){
line 30: 		$ASIN = 1;
line 31: 		$buy_amazon = "http://www.amazon.com/gp/product/$isbn/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 32: 	}
line 33: 	else{
line 34: 		$isbn_struct = Business::ISBN->new($isbn);
line 35: 		if($isbn_struct && $isbn_struct->is_valid){
line 36: 			$isbn10 = $isbn_struct->as_isbn10;
line 37: 			$isbn13 = $isbn_struct->as_isbn13;
line 38: 			$isbn10_string = $isbn10->as_string([]);
line 39: 			$isbn13_string = $isbn13->as_string([]);
line 40: 			$buy_amazon = "http://www.amazon.com/gp/product/$isbn10_string/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 41: 			$buy_apple = "http://itunes.apple.com/us/book/isbn$isbn13_string?at=10lvId";
line 42: 			$buy_indiebound = "http://www.indiebound.org/book/$isbn13_string?aff=PublishersWeekly";
line 43: 			$buy_powells = "http://www.powells.com/partner/41251/biblio/$isbn13_string?p_isbn";
line 44: 			$buy_google = "https://play.google.com/store/search?q=$isbn13_string&c=books&PAfiiliateID=11lwg2";
line 45: 
line 46: 			$buy_bandn = "http://www.anrdoezrs.net/click-7485766-11819508?url=http://www.barnesandnoble.com/w/?ean=$isbn13_string";
line 47: 
line 48: #			my $bnxml = get("https://pds.barnesandnoble.com/fetch-data-service/productAffiliate?ids=$isbn13_string");
line 49: #
line 50: #			if($bnxml){
line 51: #				my $xmlDoc = XML::Simple->new();
line 52: #				my $xmlHash = $xmlDoc->XMLin($bnxml);
line 53: #
line 54: #				if( $xmlHash->{'ProductAffiliateResult'}
line 55: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}
line 56: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'}){
line 57: #						$buy_bandn = "http://www.dpbolvw.net/click-4260421-11819508?url=" . $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'};
line 58: #				}
line 59: #			}
line 60: #
line 61: #			$buy_bandn = "http://click.linksynergy.com/deeplink?mid=36889&id=uWBQGnFbkjk&murl=http%3A%2F%2Fcart2.barnesandnoble.com%2FShop%2Fxt_manage_cart.asp%3Fean%3D$isbn13_string%26productcode%3DBK";
line 62: 
line 63: 		}
line 64: 	}
line 65: 	my $title = "I Know What the Red Clay Looks Like: The Voice and Vision of Black American Women Writers Qty & Cn$ Are Paper";
line 66: 
line 67: 	$title = encode_entities($title, '<>&":()[]');
line 68: 
line 69: 	if($linetext){
line 70: 		print "<span id=\"box_inline$main::ENV{'buy_counter'}\" class=\"buy-link\" onmouseover=\"\$(\'#buy-container$main::ENV{'buy_counter'}\').fadeIn(100);\" onmouseleave=\"dismissUnlessEnter('#buy-container$main::ENV{\"buy_counter\"}','#box_inline$main::ENV{\"buy_counter\"}')\";>$linetext</span>\n";
line 71: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" onmouseleave=\"\$(\'#buy-container$main::ENV{'buy_counter'}\').fadeOut(100);\" style=\"$box_style\">\n";
line 72: 	}
line 73: 	else{
line 74: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" style=\"$box_style\">\n";
line 75: 	}
line 76: 	if(!$no_image) {
line 77: 		print "
EVAL ERROR: Global symbol "$title" requires explicit package name at (eval 10910) line 11.

Code:
line 1: package tmpevalpackage;
line 2: sub doEval { 
line 3: 	my(@incoming,$isbn);
line 4: 
line 5: 	$main::ENV{'image_url'} = '';
line 6: 
line 7: 	@incoming = split(/,/,"$isbn");
line 8: 	$isbn = $incoming[0];
line 9: 	
line 10: 	$isbn =~ s/-//g;
line 11: 	$main::ENV{'image_alt_title'} = "$title";
line 12: 		 = "https://booklife.com/image-factory/http/localhost/amazongetcover/$isbn.jpg/w204.jpg";
line 13:  };
line 14: &doEval();
line 15: 1;
"; line 78: print "<div id=\"buy-box\">\n"; line 79: } line 80: else { line 81: print "<div id=\"buy-box\" style=\"width:100%;margin-top:10px;margin-bottom:20px;\">\n"; line 82: } line 83: print "<div id=\"buy-inner-box\" class=\"buy-box\">\n"; line 84: if($linetext){ line 85: print "<div class=\"buy-box-header\">Buy this book</div>\n"; line 86: } line 87: else{ line 88: print "<div class=\"buy-box-header\" onClick=\"\$(\'.buy-box-body$main::ENV{'buy_counter'}\').toggle(100);\">Buy this book</div>\n"; line 89: } line 90: print "<div class=\"buy-box-body$main::ENV{'buy_counter'}\" style=\"$drawer_style\">\n"; line 91: print "<div class=\"buy-box-item\">\n"; line 92: print "<a href=\"$buy_amazon\" target=\"_offsite\">Amazon</a>\n"; line 93: print "</div>\n"; line 94: if(!$ASIN){ line 95: if($buy_bandn){ line 96: print "<div class=\"buy-box-item\">\n"; line 97: print "<a href=\"$buy_bandn\" target=\"_offsite\">Barnes & Noble</a>\n"; line 98: print "</div>\n"; line 99: } line 100: #print "<div class=\"buy-box-item\">\n"; line 101: #print "<a href=\"$buy_google\" target=\"_offsite\">Google</a>\n"; line 102: #print "</div>\n"; line 103: print "<div class=\"buy-box-item\">\n"; line 104: print "<a href=\"$buy_apple\" target=\"_offsite\">iBooks</a>\n"; line 105: print "</div>\n"; line 106: print "<div class=\"buy-box-item\">\n"; line 107: print "<a href=\"$buy_indiebound\" target=\"_offsite\">IndieBound</a>\n"; line 108: print "</div>\n"; line 109: print "<div class=\"buy-box-item\">\n"; line 110: print "<a href=\"$buy_powells\" target=\"_offsite\">Powell's</a>\n"; line 111: print "</div>\n"; line 112: } line 113: print "</div>\n"; line 114: print "</div>\n"; line 115: print "</div>\n"; line 116: # if($has_ad && !$no_image){ line 117: # print "<div>\n"; line 118: # print "<div><a rel=\"nofollow\" href=\"https://www.publishersweekly.com/pw/link-tracker?action=click&id=8\"> </a><img src=\"https://www.publishersweekly.com/pw/link-tracker?action=impression&id=8\" width=\"1\" height=\"1\"></div>\n"; line 119: # print "<div class=\"quicklinks-ad\">ADVERTISEMENT</div>"; line 120: # print "<iframe src=\"//ads.ad-center.com/smart_ad/display?ref=5042105&q=KEYWORD&smart_ad_id=16481\" width=\"204\" height=\"70\" frameborder=\"0\" scrolling=\"no\" allowtransparency=\"true\"></iframe>\n"; line 121: # print "</div>\n"; line 122: # } line 123: print "</div>\n"; line 124: line 125: }; line 126: &doEval(); line 127: 1;
The Best Books, Emailed Every Week
Tip Sheet!
MORE BOOKS YOU'D LIKE
X