#!/usr/bin/perl

my $sql = 'SELECT table.field0, table.field1 FROM table;';
$sql =~ s/table.//g;
print "$sql\n";