← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to lib/GenTest/Transform/FromSubquery.pm

initial import from internal tree

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/GenTest/Transform/FromSubquery.pm
 
1
package GenTest::Transform::FromSubquery;
 
2
 
 
3
use strict;
 
4
use lib 'lib';
 
5
use GenTest::Constants;
 
6
 
 
7
sub transform {
 
8
        my ($class, $orig_query) = @_;
 
9
 
 
10
        $orig_query =~ s{SELECT (.*?) FROM (.*)}{SELECT * FROM ( SELECT $1 FROM $2 ) AS FROM_SUBQUERY }sio;
 
11
        return $orig_query." /* TRANSFORM_OUTCOME_UNORDERED_MATCH */";
 
12
 
 
13
}
 
14
 
 
15
1;