#!/usr/bin/perl
use WWW::Extractor;

# Example 1 - Beyond (email)

# ACCESS
load_text 'beyond.txt';

# EXTRACTION
$table = read_table 'Report of Sales';

# OUTPUT
print $table;