This Perl 6 program reads a web page at the Social Security Administration and sets the corresponding elements in a @areagroup bit vector if those first five digits of Social Security number are legal. The program produces this output.

Revised: November 15, 2006
Created: October 11, 2006