This can be seen in action on this page: http://www.ruddwire.com/friendly-data/naics-explorer/, in the NAICS search box.

 
#!/usr/bin/perl
 
use strict;
use DBI();
use CGI qw(:standard);
 
 
my $dbh;
my $sth;
my $mySQL;
my $result = '({"failure":1})';
 
#QUERY PARAMS
my $q;
 
 
 
my $ref;
my $table = "";
my $tableRow;
 
my $query = new CGI;
 
 
 
 
 
if($query->param()){
 
 
    $q = $query->param('q');
    $q =~ s/\s+/%/;  # REPLACE SPACES WITH WILD CARD CHARACTER, CAUSES TO SEARCH FOR ALL WORDS, NOT JUST PHRASE
 
    ### Connect to the database.
	my $dbh = DBI->connect("DBI:mysql:database=***DBNAME***;host=localhost",
                         "***USERNAME***", "***PASSWORD***",
                         {'RaiseError' => 1});
 
    	### GET INDUSTRY NAME AND CODE
    	$mySQL = "SELECT code,industry FROM naics2007IndustryIndex WHERE industry LIKE ? ORDER BY industry";
 
 
     $sth = $dbh->prepare($mySQL);
     $sth->execute("%".${q}."%");
 
      while ($ref = $sth->fetchrow_hashref()) {
 
		  while ((my $key, my $value) = each(%$ref)){
		  	  $value =~ s/"/\\"/g;
			  $tableRow .= "\"${value}\",";
		  }
 
		  $tableRow =~ s/,$//;
		  $tableRow = "[${tableRow}],";
 
		  $table .= $tableRow;
		  $tableRow = "";
      }
 
		$table =~ s/,$//;
 
	  	$result = '{"failure":0,"result":['.$table.']}';         
 
}### END IF QUERY
 
 
 
print "Content-type: text/javascript; charset=iso-8859-1\n\n";
 
print $result;
 
exit(0);

This can be seen in action on this page: http://www.ruddwire.com/friendly-data/naics-explorer/.

#!/usr/bin/perl
 
use strict;
use DBI();
use CGI qw(:standard);
 
 
my $dbh;
my $sth;
my $mySQL;
my $result = '({"failure":1})';
 
#QUERY PARAMS
my $strLn;
my $classification;
my $getDef;
my $getIndus;
 
my $naicsMatch = "";
my $countMatch = "";
my @subClasses;
my $ref;
my $table = "";
my $tableRow;
 
 
sub scrubInputText {
 
   my($it) = @_;
   my $shellChars = q-[&;`'\\\"\|\*\?\~<>\^\(\)\[\]\{\}\$\\n\\r]-;    #`
 
    $it =~ s/$shellChars//g;
    $it =~ s/^\s+|\s+$//g;
 
   return $it;
 
}
 
 
my $query = new CGI;
 
if($query->param()){
 
    $strLn = &scrubInputText($query->param('strLn'));
    $classification = &scrubInputText($query->param('cls'));
    $getDef = &scrubInputText($query->param('getDef'));
    $getIndus = &scrubInputText($query->param('getIndus'));
 
    ###HANDLE GROUPED SECTOR CODES, IE: 31-33
    if($classification =~ /-/){
    	@subClasses = split("-",$classification);
		$naicsMatch = "AND (";
 
		for(my $subClass = $subClasses[0]; $subClass <= $subClasses[1]; $subClass++){
    		$naicsMatch .= "code LIKE '${subClass}%' OR ";
    		$countMatch .= "code LIKE '${subClass}%' OR ";
    	}
    	$countMatch =~ s/ OR $//;
    	$naicsMatch =~ s/ OR $//;
    	$naicsMatch .= ")";
    }else{
       $naicsMatch = "AND code LIKE '${classification}%'";
    }
 
	if($strLn != 2){$countMatch = "code LIKE Concat(naics2007.code,'%')";}
 
    ### Connect to the database.
	my $dbh = DBI->connect("DBI:mysql:database=***DBNAME***;host=localhost",
                         "***USERNAME***", "***PASSWORD***",
                         {'RaiseError' => 1});
 
    if($getDef){
    	$mySQL = "SELECT definition FROM naics2007definitions WHERE code='${classification}'";
    }elsif($getIndus){
    	### GET FINAL INDUSTRY NAME
    	$mySQL = "SELECT code,industry FROM naics2007IndustryIndex WHERE code LIKE '${classification}' ORDER BY industry";
    }else{
    	### GET INDUSTRY CLASSIFICATIONS
 
 
 		$mySQL = "SELECT code,title, ".
     	"(SELECT COUNT(code) FROM naics2007IndustryIndex WHERE ".
     	"CASE naics2007.code ".
     	"WHEN '31-33' THEN (code LIKE '31%' OR code LIKE '32%' OR code LIKE '33%') ".
     	"WHEN '44-45' THEN (code LIKE '44%' OR code LIKE '45%') ".
     	"WHEN '48-49' THEN (code LIKE '48%' OR code LIKE '49%') ".
     	"ELSE code LIKE Concat(naics2007.code,'%') END) AS c".
     	" FROM naics2007 WHERE (CHAR_LENGTH(code) = $strLn OR code LIKE '__-__')".$naicsMatch;
 
    }
 
 
     $sth = $dbh->prepare($mySQL);
     $sth->execute();
 
      while ($ref = $sth->fetchrow_hashref()) {
 
		  while ((my $key, my $value) = each(%$ref)){
		  	  $value =~ s/"/\\"/g;
			  $tableRow .= "\"${value}\",";
		  }
 
		  $tableRow =~ s/,$//;
		  $tableRow = "[${tableRow}],";
 
		  $table .= $tableRow;
		  $tableRow = "";
      }
 
		$table =~ s/,$//;
 
	  	$result = '{"failure":0,"result":['.$table.']}';
 
}### END IF QUERY
 
 
 
print "Content-type: application/json; charset=iso-8859-1\n\n";
 
print $result;
 
exit(0);

I fixed this the following way (this is basically resetting the Power Management Unit — PMU):

I disconnected the computer from the power cord, and from all other cables.

I held down the power button for several seconds to turn off the computer.

I let it sit 5 minutes.

I restarted the laptop while holding down the Shift key.  This restarted the computer in Safe Mode, with the screen visible again.

After I logged in (in Safe Mode) to make sure everything was ok, I simply restarted the computer the normal way, and the screen behaved normally again.

=================================

If that doesn’t work for you, you could try these steps, documented at apple.com:

Holding down Command, Option, P, and R to reset your PRAM and NVRAM

Resetting PowerBook and iBook Power Management Unit (PMU)

1. Make your list of files, with complete paths, call it “imgList.txt”. Put every file on a new line.
2. Write a small awk script with the following 1 line:
   { printf(”cp %s images/\n”,$0);}
3. Save the script as “copyList.awk”
4. Do the following command:
   awk -f copyList.awk imgList.txt | sh

Brief explanation of the awk script:

• %s means you’re putting a string in that spot of your output,
• $0 is the string you’re putting there
• $0 is a match for each line in the file “imgList.txt”
• images/ is the directory to copy your files to (in this example relative to where the command will be run from – can be absolute, of course)
• \n stands for new line

brief explanation of the command:

• awk executes the awk code found in “copyList.awk” on the lines found in “imgList.txt” and pipes the output to the shell ( | sh).

HTML character entity, wrong:
formElement.value = "Dirección";
You get: Dirección

Unicode character code, correct:
formElement.value = "Direcci\u00F3n";
You get: Dirección

Unicode character charts are located here: http://www.unicode.org/charts/. The chart you will most likely need is the Latin-1 chart.  Character codes must be preceded by \u. That is, character code 00F3 is written in JavaScript as \u00F3.

Hope this helps.

I use the Google API’s jQuery, and it automatically upgraded my whole site to jQuery 1.4.   In jQuery 1.4, they decided to tighten up the JSON parsing engine, so that it is now unforgiving of any lax standards.  You have to follow the JSON standard spelled out here — to the letter.  In my case, that meant changing any single quoted values or names to double quotes, and getting rid of opening and closing parentheses.  Like most fixes, it was an easy fix, once I figured it out.  Hope this helps.

-Colin

But I have to ask: if the magazine app wasn’t a hit on PCs, why would it be a hit on tablets?  The same problem will exist on tablets:  readers will be able to get their news and pictures from other normal web sites that don’t charge, just like they can on a PC.

So what if the tablet will have dimensions more like those of a magazine?  So what if it will make for a better “lean back” experience?  These qualities will make reading the same old free internet from the comfort of your couch a much better experience, too.

Web page designers will redesign their sites to fit the tablet format better, just like they created smart phone versions of their sites.

Basically, on tablets like on PCs, if you can get if for free, why ever would you pay?

IE 8 inPrivate Filtering mode can be set to on/enabled by default by doing the following:

1. Open IE 8.
2. Click on the InPrivate Filtering button in the status bar (lower right) to enable inPrivate Filtering.
3. Leaving your IE 8 browser open, go to and click on your Windows Start button.  Click on the “Run..” button, found below the Search button. (this is for Windows XP users.  I don’t know yet how to open the Registry Editor on Windows Vista, since I don’t have Windows Vista)
4. type “regedit” in the run box.  Hit “Ok”.
5. The Windows Registry Editor tool will open.
6. In the tool, open this folder:  My Computer\HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Safety\PrivacIE
7. Once this folder is open, click on:  Edit > New > DWORD Value
8. Give the new value that appears this name:  ”StartMode”.  Hit enter
9. Right click on the new StartMode, choose “Modify”.
10. In the field “Value Data”, type “1″.  Hit “Ok”.
11. That’s it.  Close the Registry Editor.  Close and restart your IE 8 browser, you’ll see that inPrivate Filtering is on by default.

The salary data is taken from the Bureau of Labor Statistics.  Of course the data is searchable on the BLS site, but I thought I could give it a more user-friendly interface, using AJAX and jQuery.

Give it a visit, give it a search, and let me know if you have any suggestions.

Cheers,

Colin