Life@Work: Marketplace Success for People of Faith

John C. Maxwell, Author, Thomas Addington, Author, Stephen Graves, Author . Nelson Business $22.99 (240p) ISBN 978-0-7852-1170-9
EVAL ERROR: Global symbol "@Work" requires explicit package name at (eval 1142) line 63.

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: 
line 7: 	my($isbn_struct,$isbn10_string,$isbn13_string,$isbn10,$isbn13,$ASIN,$linetext);
line 8: 	my($has_ad, $box_style, $buy_amazon, $buy_apple, $buy_indiebound, $buy_powells, $buy_google, $buy_bandn, $drawer_style);
line 9: 
line 10: 	++$main::ENV{'buy_counter'};
line 11: 
line 12: 	my ($isbn) = "978-0-7852-1170-9";
line 13: 	if("1"){
line 14: 		$has_ad = 1;
line 15: 	}
line 16: 
line 17: 	$linetext = "";
line 18: 	my $no_image = "";
line 19: 	if($linetext){
line 20: 		$box_style .= "display:none;position:absolute;z-index:99999;width:100px;";
line 21: 		$drawer_style .= "display:block;";		
line 22: 	}
line 23: 	else{
line 24: 		$drawer_style .= "display:none;";		
line 25: 	}
line 26: 	
line 27: 	if($isbn =~ s/^ASIN(.+)/$1/){
line 28: 		$ASIN = 1;
line 29: 		$buy_amazon = "http://www.amazon.com/gp/product/$isbn/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 30: 	}
line 31: 	else{
line 32: 		$isbn_struct = Business::ISBN->new($isbn);
line 33: 		if($isbn_struct && $isbn_struct->is_valid){
line 34: 			$isbn10 = $isbn_struct->as_isbn10;
line 35: 			$isbn13 = $isbn_struct->as_isbn13;
line 36: 			$isbn10_string = $isbn10->as_string([]);
line 37: 			$isbn13_string = $isbn13->as_string([]);
line 38: 			$buy_amazon = "http://www.amazon.com/gp/product/$isbn10_string/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 39: 			$buy_apple = "http://itunes.apple.com/us/book/isbn$isbn13_string?at=10lvId";
line 40: 			$buy_indiebound = "http://www.indiebound.org/book/$isbn13_string?aff=PublishersWeekly";
line 41: 			$buy_powells = "http://www.powells.com/partner/41251/biblio/$isbn13_string?p_isbn";
line 42: 			$buy_google = "https://play.google.com/store/search?q=$isbn13_string&c=books&PAfiiliateID=11lwg2";
line 43: 			
line 44: 			$buy_bandn = "http://www.anrdoezrs.net/click-7485766-11819508?url=http://www.barnesandnoble.com/w/?ean=$isbn13_string";
line 45: 			
line 46: #			my $bnxml = get("https://pds.barnesandnoble.com/fetch-data-service/productAffiliate?ids=$isbn13_string");
line 47: #			
line 48: #			if($bnxml){
line 49: #				my $xmlDoc = XML::Simple->new();
line 50: #				my $xmlHash = $xmlDoc->XMLin($bnxml);
line 51: #				
line 52: #				if( $xmlHash->{'ProductAffiliateResult'} 
line 53: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}
line 54: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'}){
line 55: #						$buy_bandn = "http://www.dpbolvw.net/click-4260421-11819508?url=" . $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'};
line 56: #				}
line 57: #			}
line 58: #
line 59: #			$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 60: 
line 61: 		}
line 62: 	}
line 63: 	my $title = "Life@Work: Marketplace Success for People of Faith";
line 64: 	if($linetext){
line 65: 		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 66: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" onmouseleave=\"\$(\'#buy-container$main::ENV{'buy_counter'}\').fadeOut(100);\" style=\"$box_style\">\n";
line 67: 	}
line 68: 	else{
line 69: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" style=\"$box_style\">\n";
line 70: 	}
line 71: 	if(!$no_image) { 
line 72: 		print "
EVAL ERROR: Global symbol "$title" requires explicit package name at (eval 1144) 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: 		 = "http://booklife.com/image-factory/http/localhost/amazongetcover/$isbn.jpg/w204.jpg";
line 13:  };
line 14: &doEval();
line 15: 1;
"; line 73: print "<div id=\"buy-box\">\n"; line 74: } line 75: else { line 76: print "<div id=\"buy-box\" style=\"width:100%;margin-top:10px;margin-bottom:20px;\">\n"; line 77: } line 78: print "<div id=\"buy-inner-box\" class=\"buy-box\">\n"; line 79: if($linetext){ line 80: print "<div class=\"buy-box-header\">Buy this book</div>\n"; line 81: } line 82: else{ line 83: print "<div class=\"buy-box-header\" onClick=\"\$(\'.buy-box-body$main::ENV{'buy_counter'}\').toggle(100);\">Buy this book</div>\n"; line 84: } line 85: print "<div class=\"buy-box-body$main::ENV{'buy_counter'}\" style=\"$drawer_style\">\n"; line 86: print "<div class=\"buy-box-item\">\n"; line 87: print "<a href=\"$buy_amazon\" target=\"_offsite\">Amazon</a>\n"; line 88: print "</div>\n"; line 89: if(!$ASIN){ line 90: if($buy_bandn){ line 91: print "<div class=\"buy-box-item\">\n"; line 92: print "<a href=\"$buy_bandn\" target=\"_offsite\">Barnes & Noble</a>\n"; line 93: print "</div>\n"; line 94: } line 95: #print "<div class=\"buy-box-item\">\n"; line 96: #print "<a href=\"$buy_google\" target=\"_offsite\">Google</a>\n"; line 97: #print "</div>\n"; line 98: print "<div class=\"buy-box-item\">\n"; line 99: print "<a href=\"$buy_apple\" target=\"_offsite\">iBooks</a>\n"; line 100: print "</div>\n"; line 101: print "<div class=\"buy-box-item\">\n"; line 102: print "<a href=\"$buy_indiebound\" target=\"_offsite\">IndieBound</a>\n"; line 103: print "</div>\n"; line 104: print "<div class=\"buy-box-item\">\n"; line 105: print "<a href=\"$buy_powells\" target=\"_offsite\">Powell's</a>\n"; line 106: print "</div>\n"; line 107: } line 108: print "</div>\n"; line 109: print "</div>\n"; line 110: print "</div>\n"; line 111: # if($has_ad && !$no_image){ line 112: # print "<div>\n"; line 113: # print "<div><a rel=\"nofollow\" href=\"https://secure.publishersweekly.com/pw/link-tracker?action=click&id=8\"> </a><img src=\"https://secure.publishersweekly.com/pw/link-tracker?action=impression&id=8\" width=\"1\" height=\"1\"></div>\n"; line 114: # print "<div class=\"quicklinks-ad\">ADVERTISEMENT</div>"; line 115: # 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 116: # print "</div>\n"; line 117: # } line 118: print "</div>\n"; line 119: line 120: }; line 121: &doEval(); line 122: 1;

Beginning with Charlie, a hard-charging businessman and recent Christian convert who feels himself torn between "Charlie Love" and "Charlie Money," the authors lament that the church, looking on the secular workplace with distance if not suspicion, has little to offer the Charlies in its midst. The authors—Graves and Addington are producers of Life@Work Journal and Maxwell is the foremost leadership guru among evangelicals—deploy a wealth of quotations and illustrations, loosely organized around themes of skill, calling, service and character. Although the book seeks to inspire Charlie and those like him to "reforge" their work and faith selves into a double-edged sword, it runs long on cheerleading but short on insight or practical guidance. Discussing the important and difficult subject of calling, the authors assert without apparent irony, "Like a giant job-match service in the sky, Jesus pairs His children up with His kingdom tasks." Among the book's frequent references to Jesus, his teaching is rarely discussed; most curiously, his comment about the incompatibility of serving God and Mammon is never mentioned. Although team authorship can produce excellent business books, the approach stumbles here as uneven quality and multiple authorial "I" 's give the text a cut-and-paste feel. (Aug. 18)

Reviewed on: 06/27/2005
Release date: 08/01/2005
Paperback - 282 pages - 978-1-4185-0321-5
Paperback - 220 pages - 978-1-4185-0328-4
Show other formats
FORMATS
EVAL ERROR: Global symbol "@Work" requires explicit package name at (eval 1148) line 63.

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: 
line 7: 	my($isbn_struct,$isbn10_string,$isbn13_string,$isbn10,$isbn13,$ASIN,$linetext);
line 8: 	my($has_ad, $box_style, $buy_amazon, $buy_apple, $buy_indiebound, $buy_powells, $buy_google, $buy_bandn, $drawer_style);
line 9: 
line 10: 	++$main::ENV{'buy_counter'};
line 11: 
line 12: 	my ($isbn) = "978-0-7852-1170-9";
line 13: 	if("1"){
line 14: 		$has_ad = 1;
line 15: 	}
line 16: 
line 17: 	$linetext = "";
line 18: 	my $no_image = "";
line 19: 	if($linetext){
line 20: 		$box_style .= "display:none;position:absolute;z-index:99999;width:100px;";
line 21: 		$drawer_style .= "display:block;";		
line 22: 	}
line 23: 	else{
line 24: 		$drawer_style .= "display:none;";		
line 25: 	}
line 26: 	
line 27: 	if($isbn =~ s/^ASIN(.+)/$1/){
line 28: 		$ASIN = 1;
line 29: 		$buy_amazon = "http://www.amazon.com/gp/product/$isbn/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 30: 	}
line 31: 	else{
line 32: 		$isbn_struct = Business::ISBN->new($isbn);
line 33: 		if($isbn_struct && $isbn_struct->is_valid){
line 34: 			$isbn10 = $isbn_struct->as_isbn10;
line 35: 			$isbn13 = $isbn_struct->as_isbn13;
line 36: 			$isbn10_string = $isbn10->as_string([]);
line 37: 			$isbn13_string = $isbn13->as_string([]);
line 38: 			$buy_amazon = "http://www.amazon.com/gp/product/$isbn10_string/ref=as_li_tl?ie=UTF8&tag=publiweekl05-20";
line 39: 			$buy_apple = "http://itunes.apple.com/us/book/isbn$isbn13_string?at=10lvId";
line 40: 			$buy_indiebound = "http://www.indiebound.org/book/$isbn13_string?aff=PublishersWeekly";
line 41: 			$buy_powells = "http://www.powells.com/partner/41251/biblio/$isbn13_string?p_isbn";
line 42: 			$buy_google = "https://play.google.com/store/search?q=$isbn13_string&c=books&PAfiiliateID=11lwg2";
line 43: 			
line 44: 			$buy_bandn = "http://www.anrdoezrs.net/click-7485766-11819508?url=http://www.barnesandnoble.com/w/?ean=$isbn13_string";
line 45: 			
line 46: #			my $bnxml = get("https://pds.barnesandnoble.com/fetch-data-service/productAffiliate?ids=$isbn13_string");
line 47: #			
line 48: #			if($bnxml){
line 49: #				my $xmlDoc = XML::Simple->new();
line 50: #				my $xmlHash = $xmlDoc->XMLin($bnxml);
line 51: #				
line 52: #				if( $xmlHash->{'ProductAffiliateResult'} 
line 53: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}
line 54: #					&& $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'}){
line 55: #						$buy_bandn = "http://www.dpbolvw.net/click-4260421-11819508?url=" . $xmlHash->{'ProductAffiliateResult'}->{'Product'}->{'Url'};
line 56: #				}
line 57: #			}
line 58: #
line 59: #			$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 60: 
line 61: 		}
line 62: 	}
line 63: 	my $title = "Life@Work: Marketplace Success for People of Faith";
line 64: 	if($linetext){
line 65: 		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 66: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" onmouseleave=\"\$(\'#buy-container$main::ENV{'buy_counter'}\').fadeOut(100);\" style=\"$box_style\">\n";
line 67: 	}
line 68: 	else{
line 69: 		print "<div id=\"buy-container$main::ENV{'buy_counter'}\" style=\"$box_style\">\n";
line 70: 	}
line 71: 	if(!$no_image) { 
line 72: 		print "
EVAL ERROR: Global symbol "$title" requires explicit package name at (eval 1150) 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: 		 = "http://booklife.com/image-factory/http/localhost/amazongetcover/$isbn.jpg/w204.jpg";
line 13:  };
line 14: &doEval();
line 15: 1;
"; line 73: print "<div id=\"buy-box\">\n"; line 74: } line 75: else { line 76: print "<div id=\"buy-box\" style=\"width:100%;margin-top:10px;margin-bottom:20px;\">\n"; line 77: } line 78: print "<div id=\"buy-inner-box\" class=\"buy-box\">\n"; line 79: if($linetext){ line 80: print "<div class=\"buy-box-header\">Buy this book</div>\n"; line 81: } line 82: else{ line 83: print "<div class=\"buy-box-header\" onClick=\"\$(\'.buy-box-body$main::ENV{'buy_counter'}\').toggle(100);\">Buy this book</div>\n"; line 84: } line 85: print "<div class=\"buy-box-body$main::ENV{'buy_counter'}\" style=\"$drawer_style\">\n"; line 86: print "<div class=\"buy-box-item\">\n"; line 87: print "<a href=\"$buy_amazon\" target=\"_offsite\">Amazon</a>\n"; line 88: print "</div>\n"; line 89: if(!$ASIN){ line 90: if($buy_bandn){ line 91: print "<div class=\"buy-box-item\">\n"; line 92: print "<a href=\"$buy_bandn\" target=\"_offsite\">Barnes & Noble</a>\n"; line 93: print "</div>\n"; line 94: } line 95: #print "<div class=\"buy-box-item\">\n"; line 96: #print "<a href=\"$buy_google\" target=\"_offsite\">Google</a>\n"; line 97: #print "</div>\n"; line 98: print "<div class=\"buy-box-item\">\n"; line 99: print "<a href=\"$buy_apple\" target=\"_offsite\">iBooks</a>\n"; line 100: print "</div>\n"; line 101: print "<div class=\"buy-box-item\">\n"; line 102: print "<a href=\"$buy_indiebound\" target=\"_offsite\">IndieBound</a>\n"; line 103: print "</div>\n"; line 104: print "<div class=\"buy-box-item\">\n"; line 105: print "<a href=\"$buy_powells\" target=\"_offsite\">Powell's</a>\n"; line 106: print "</div>\n"; line 107: } line 108: print "</div>\n"; line 109: print "</div>\n"; line 110: print "</div>\n"; line 111: # if($has_ad && !$no_image){ line 112: # print "<div>\n"; line 113: # print "<div><a rel=\"nofollow\" href=\"https://secure.publishersweekly.com/pw/link-tracker?action=click&id=8\"> </a><img src=\"https://secure.publishersweekly.com/pw/link-tracker?action=impression&id=8\" width=\"1\" height=\"1\"></div>\n"; line 114: # print "<div class=\"quicklinks-ad\">ADVERTISEMENT</div>"; line 115: # 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 116: # print "</div>\n"; line 117: # } line 118: print "</div>\n"; line 119: line 120: }; line 121: &doEval(); line 122: 1;
The Best Books, Emailed Every Week
Tip Sheet!
MORE BOOKS YOU'D LIKE
X