===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
ora2pg-21.0/README-2554-
ora2pg-21.0/README:2555: <sql>SELECT * FROM HR.EMPLOYEES WHERE ABS(MOD(employee_id,${Internal.Step.Unique.Count}))=${Internal.Step.Unique.Number}</sql>
ora2pg-21.0/README-2556-
##############################################
ora2pg-21.0/doc/ora2pg.3-2744-.Vb 1
ora2pg-21.0/doc/ora2pg.3:2745:\& <sql>SELECT * FROM HR.EMPLOYEES WHERE ABS(MOD(employee_id,${Internal.Step.Unique.Count}))=${Internal.Step.Unique.Number}</sql>
ora2pg-21.0/doc/ora2pg.3-2746-.Ve
##############################################
ora2pg-21.0/doc/Ora2Pg.pod-2646-
ora2pg-21.0/doc/Ora2Pg.pod:2647: <sql>SELECT * FROM HR.EMPLOYEES WHERE ABS(MOD(employee_id,${Internal.Step.Unique.Count}))=${Internal.Step.Unique.Number}</sql>
ora2pg-21.0/doc/Ora2Pg.pod-2648-
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-7105- IF (maxval IS NOT NULL) THEN
ora2pg-21.0/lib/Ora2Pg.pm:7106: query := \$\$SELECT (string_to_array(adsrc,''''))[2] FROM pg_attrdef WHERE adrelid = '\$\$
ora2pg-21.0/lib/Ora2Pg.pm:7107: || tbname || \$\$'::regclass AND adnum = (SELECT attnum FROM pg_attribute WHERE attrelid = '\$\$
ora2pg-21.0/lib/Ora2Pg.pm-7108- || tbname || \$\$'::regclass AND attname = '\$\$ || colname || \$\$') AND adsrc LIKE 'nextval%'\$\$;
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-8288- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:8289: $sql .= "WHERE A.OWNER='$self->{schema}' ";
ora2pg-21.0/lib/Ora2Pg.pm-8290- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9127- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:9128: $sql .= " WHERE SEQUENCE_OWNER='$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-9129- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9187- } else {
ora2pg-21.0/lib/Ora2Pg.pm:9188: $realtable = "\`$realtable\`";
ora2pg-21.0/lib/Ora2Pg.pm-9189- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9221- } else {
ora2pg-21.0/lib/Ora2Pg.pm:9222: $name->[$k]->[0] = '`' . $name->[$k]->[0] . '`';
ora2pg-21.0/lib/Ora2Pg.pm-9223- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9418-
ora2pg-21.0/lib/Ora2Pg.pm:9419: ($str =~ / WHERE /) ? $str .= ' AND ' : $str .= ' WHERE ';
ora2pg-21.0/lib/Ora2Pg.pm-9420- if (!$self->{is_mysql} || ($self->{where}{"\L$table\E"} !~ /\s+LIMIT\s+\d/)) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9428-
ora2pg-21.0/lib/Ora2Pg.pm:9429: ($str =~ / WHERE /) ? $str .= ' AND ' : $str .= ' WHERE ';
ora2pg-21.0/lib/Ora2Pg.pm-9430- if (!$self->{is_mysql} || ($self->{global_where} !~ /\s+LIMIT\s+\d/)) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9641-FROM $self->{prefix}_TAB_COLUMNS A, ALL_OBJECTS O, ALL_TAB_COLS V
ora2pg-21.0/lib/Ora2Pg.pm:9642:WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='$objtype'
ora2pg-21.0/lib/Ora2Pg.pm-9643- AND A.OWNER=V.OWNER AND A.TABLE_NAME=V.TABLE_NAME AND A.COLUMN_NAME=V.COLUMN_NAME $condition
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9661-FROM $self->{prefix}_TAB_COLUMNS A, ALL_OBJECTS O
ora2pg-21.0/lib/Ora2Pg.pm:9662:WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='$objtype'
ora2pg-21.0/lib/Ora2Pg.pm-9663- $condition
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9849-SELECT A.COLUMN_NAME, A.NULLABLE, A.DATA_DEFAULT, A.TABLE_NAME, A.OWNER, A.COLUMN_ID
ora2pg-21.0/lib/Ora2Pg.pm:9850:FROM $self->{prefix}_TAB_COLUMNS A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='$objtype' $condition
ora2pg-21.0/lib/Ora2Pg.pm-9851-ORDER BY A.COLUMN_ID
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9859-SELECT A.COLUMN_NAME, A.NULLABLE, A.DATA_DEFAULT, A.TABLE_NAME, A.OWNER, A.COLUMN_ID
ora2pg-21.0/lib/Ora2Pg.pm:9860:FROM $self->{prefix}_TAB_COLUMNS A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='$objtype' $condition
ora2pg-21.0/lib/Ora2Pg.pm-9861-ORDER BY A.COLUMN_ID
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-9879- if ( ($f->[1] =~ /GEOMETRY/i) && ($self->{convert_srid} <= 1) ) {
ora2pg-21.0/lib/Ora2Pg.pm:9880: $spatial_srid = "SELECT COALESCE(SRID, $self->{default_srid}) FROM ALL_SDO_GEOM_METADATA WHERE TABLE_NAME='\U$table\E' AND COLUMN_NAME='$row->[0]' AND OWNER='\U$self->{tables}{$table}{table_info}{owner}\E'";
ora2pg-21.0/lib/Ora2Pg.pm-9881- if ($self->{convert_srid} == 1) {
ora2pg-21.0/lib/Ora2Pg.pm:9882: $spatial_srid = "SELECT COALESCE(sdo_cs.map_oracle_srid_to_epsg(SRID), $self->{default_srid}) FROM ALL_SDO_GEOM_METADATA WHERE TABLE_NAME='\U$table\E' AND COLUMN_NAME='$row->[0]' AND OWNER='\U$self->{tables}{$table}{table_info}{owner}\E'";
ora2pg-21.0/lib/Ora2Pg.pm-9883- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10001- if ($owner) {
ora2pg-21.0/lib/Ora2Pg.pm:10002: $sql .= " WHERE A.OWNER = '$owner'";
ora2pg-21.0/lib/Ora2Pg.pm-10003- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10073-FROM $self->{prefix}_CONSTRAINTS A
ora2pg-21.0/lib/Ora2Pg.pm:10074:WHERE A.CONSTRAINT_TYPE='C' $condition
ora2pg-21.0/lib/Ora2Pg.pm-10075-AND A.STATUS='ENABLED'
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10154- LEFT JOIN $self->{prefix}_CONS_COLUMNS COLS_R ON (COLS_R.CONSTRAINT_NAME = CONS.R_CONSTRAINT_NAME AND COLS_R.POSITION=COLS.POSITION AND COLS_R.OWNER = CONS.R_OWNER)
ora2pg-21.0/lib/Ora2Pg.pm:10155:WHERE CONS.CONSTRAINT_TYPE = 'R' $condition
ora2pg-21.0/lib/Ora2Pg.pm-10156-END
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10239- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:10240: $str .= " WHERE b.GRANTOR = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10241- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10276- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:10277: $str .= " WHERE b.GRANTOR = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10278- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10310- # Get all system priviledge given to a role
ora2pg-21.0/lib/Ora2Pg.pm:10311: $str = "SELECT PRIVILEGE,ADMIN_OPTION FROM DBA_SYS_PRIVS WHERE GRANTEE = '$r'";
ora2pg-21.0/lib/Ora2Pg.pm-10312- $str .= " " . $self->limit_to_objects('GRANT', 'GRANTEE');
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10323- foreach my $u (@done) {
ora2pg-21.0/lib/Ora2Pg.pm:10324: $str = "SELECT GRANTED_ROLE FROM DBA_ROLE_PRIVS WHERE GRANTEE = '$u'";
ora2pg-21.0/lib/Ora2Pg.pm-10325- $str .= " " . $self->limit_to_objects('GRANT', 'GRANTEE');
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10331- }
ora2pg-21.0/lib/Ora2Pg.pm:10332: $str = "SELECT USERNAME FROM DBA_USERS WHERE USERNAME = '$u'";
ora2pg-21.0/lib/Ora2Pg.pm-10333- $str .= " " . $self->limit_to_objects('GRANT', 'USERNAME');
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10340- next if $roles{type}{$u};
ora2pg-21.0/lib/Ora2Pg.pm:10341: $str = "SELECT ROLE,PASSWORD_REQUIRED FROM DBA_ROLES WHERE ROLE='$u'";
ora2pg-21.0/lib/Ora2Pg.pm-10342- $str .= " " . $self->limit_to_objects('GRANT', 'ROLE');
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10381- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:10382: $str .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10383- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10468-FROM $self->{prefix}_IND_COLUMNS A, $self->{prefix}_INDEXES B
ora2pg-21.0/lib/Ora2Pg.pm:10469:WHERE B.INDEX_NAME=A.INDEX_NAME AND B.OWNER=A.INDEX_OWNER $condition
ora2pg-21.0/lib/Ora2Pg.pm-10470-AND$generated B.TEMPORARY = 'N'
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10594-FROM CTXSYS.CTX_INDEX_VALUES
ora2pg-21.0/lib/Ora2Pg.pm:10595:WHERE (IXV_CLASS='WORDLIST' AND IXV_ATTRIBUTE='STEMMER') $condition
ora2pg-21.0/lib/Ora2Pg.pm-10596-END
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10632- } else {
ora2pg-21.0/lib/Ora2Pg.pm:10633: $str .= " WHERE SEQUENCE_OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10634- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10671- } else {
ora2pg-21.0/lib/Ora2Pg.pm:10672: $str .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10673- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10728- } else {
ora2pg-21.0/lib/Ora2Pg.pm:10729: $str .= " WHERE a.OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10730- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10823- } else {
ora2pg-21.0/lib/Ora2Pg.pm:10824: $str .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10825- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10870- } else {
ora2pg-21.0/lib/Ora2Pg.pm:10871: $str .= " WHERE SCHEMA_USER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10872- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10935- {
ora2pg-21.0/lib/Ora2Pg.pm:10936: my $sql = "SELECT A.TABLE_NAME,A.COMMENTS,A.TABLE_TYPE,A.OWNER FROM ALL_TAB_COMMENTS A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='VIEW' $owner";
ora2pg-21.0/lib/Ora2Pg.pm-10937- $sql .= $self->limit_to_objects('VIEW', 'A.TABLE_NAME');
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10960- } else {
ora2pg-21.0/lib/Ora2Pg.pm:10961: $str .= " WHERE v.OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-10962- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-10983-WITH x (ITER, OWNER, OBJECT_NAME) AS
ora2pg-21.0/lib/Ora2Pg.pm:10984:( SELECT 1 , o.OWNER, o.OBJECT_NAME FROM ALL_OBJECTS o WHERE OBJECT_TYPE = 'VIEW' $owner
ora2pg-21.0/lib/Ora2Pg.pm-10985- AND NOT EXISTS (SELECT 1 FROM ALL_DEPENDENCIES d WHERE TYPE LIKE 'VIEW' AND REFERENCED_TYPE = 'VIEW'
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11050- } else {
ora2pg-21.0/lib/Ora2Pg.pm:11051: $str .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-11052- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11090- } else {
ora2pg-21.0/lib/Ora2Pg.pm:11091: $str .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-11092- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11132-
ora2pg-21.0/lib/Ora2Pg.pm:11133: my $str = "SELECT COLUMN_NAME, COLUMN_ID, OWNER FROM $self->{prefix}_TAB_COLUMNS WHERE TABLE_NAME='$view'";
ora2pg-21.0/lib/Ora2Pg.pm-11134- if ($self->{schema}) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11266- if ($owner) {
ora2pg-21.0/lib/Ora2Pg.pm:11267: $sql .= " WHERE OWNER = '$owner'";
ora2pg-21.0/lib/Ora2Pg.pm-11268- } elsif (!$self->{schema}) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11270- } else {
ora2pg-21.0/lib/Ora2Pg.pm:11271: $sql .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-11272- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11376- if ($owner) {
ora2pg-21.0/lib/Ora2Pg.pm:11377: $sql .= " WHERE OWNER = '$owner'";
ora2pg-21.0/lib/Ora2Pg.pm-11378- } elsif (!$self->{schema}) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11380- } else {
ora2pg-21.0/lib/Ora2Pg.pm:11381: $sql .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-11382- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11470- } else {
ora2pg-21.0/lib/Ora2Pg.pm:11471: $sql .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-11472- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11513- while (my $row = $sth->fetch) {
ora2pg-21.0/lib/Ora2Pg.pm:11514: my $sql = "SELECT TEXT FROM $self->{prefix}_SOURCE WHERE OWNER='$row->[1]' AND NAME='$row->[0]' ORDER BY LINE";
ora2pg-21.0/lib/Ora2Pg.pm-11515- if (!$self->{schema} && $self->{export_schema}) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11574- } else {
ora2pg-21.0/lib/Ora2Pg.pm:11575: $sql .= " WHERE OWNER = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg.pm-11576- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11628- # Get package definition first
ora2pg-21.0/lib/Ora2Pg.pm:11629: my $sql = "SELECT TEXT FROM $self->{prefix}_SOURCE WHERE OWNER='$row->[1]' AND NAME='$row->[0]' AND TYPE='PACKAGE' ORDER BY LINE";
ora2pg-21.0/lib/Ora2Pg.pm-11630- my $sth2 = $self->{dbh}->prepare($sql) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11639- # Then package body code
ora2pg-21.0/lib/Ora2Pg.pm:11640: $sql = "SELECT TEXT FROM $self->{prefix}_SOURCE WHERE OWNER='$row->[1]' AND NAME='$row->[0]' AND TYPE='PACKAGE BODY' ORDER BY LINE";
ora2pg-21.0/lib/Ora2Pg.pm-11641- $sth2 = $self->{dbh}->prepare($sql) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11690- while (my $row = $sth->fetch) {
ora2pg-21.0/lib/Ora2Pg.pm:11691: my $sql = "SELECT TEXT FROM $self->{prefix}_SOURCE WHERE OWNER='$row->[1]' AND NAME='$row->[0]' AND (TYPE='TYPE' OR TYPE='TYPE BODY') ORDER BY TYPE, LINE";
ora2pg-21.0/lib/Ora2Pg.pm-11692- if (!$self->{schema} && $self->{export_schema}) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11745- {
ora2pg-21.0/lib/Ora2Pg.pm:11746: my $sql = "SELECT A.TABLE_NAME,A.COMMENTS,A.TABLE_TYPE,A.OWNER FROM ALL_TAB_COMMENTS A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='TABLE' $owner";
ora2pg-21.0/lib/Ora2Pg.pm-11747- if ($self->{db_version} !~ /Release 8/) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11763-
ora2pg-21.0/lib/Ora2Pg.pm:11764: my $sql = "SELECT A.OWNER,A.TABLE_NAME,NVL(num_rows,1) NUMBER_ROWS,A.TABLESPACE_NAME,A.NESTED,A.LOGGING,A.PARTITIONED,A.PCT_FREE FROM $self->{prefix}_TABLES A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER AND A.TABLE_NAME=O.OBJECT_NAME AND O.OBJECT_TYPE='TABLE' $owner";
ora2pg-21.0/lib/Ora2Pg.pm-11765- $sql .= " AND A.TEMPORARY='N' AND (A.NESTED != 'YES' OR A.LOGGING != 'YES') AND A.SECONDARY = 'N'";
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11848- {
ora2pg-21.0/lib/Ora2Pg.pm:11849: my $sql = "SELECT A.TABLE_NAME,A.COMMENTS,A.TABLE_TYPE,A.OWNER FROM ALL_TAB_COMMENTS A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER and A.TABLE_NAME=O.OBJECT_NAME and O.OBJECT_TYPE='TABLE' $owner";
ora2pg-21.0/lib/Ora2Pg.pm-11850- if ($self->{db_version} !~ /Release 8/) {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-11866-
ora2pg-21.0/lib/Ora2Pg.pm:11867: $sql = "SELECT A.OWNER,A.TABLE_NAME,NVL(num_rows,1) NUMBER_ROWS,A.TABLESPACE_NAME,A.NESTED,A.LOGGING FROM $self->{prefix}_TABLES A, ALL_OBJECTS O WHERE A.OWNER=O.OWNER AND A.TABLE_NAME=O.OBJECT_NAME AND O.OBJECT_TYPE='TABLE' $owner";
ora2pg-21.0/lib/Ora2Pg.pm-11868- $sql .= " AND A.TEMPORARY='Y'";
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-12264- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:12265: $str .= " WHERE (owner='$self->{schema}' OR owner='PUBLIC') AND table_owner NOT IN ('" . join("','", @{$self->{sysusers}}) . "') ";
ora2pg-21.0/lib/Ora2Pg.pm-12266- } else {
ora2pg-21.0/lib/Ora2Pg.pm:12267: $str .= " WHERE (owner='PUBLIC' OR owner NOT IN ('" . join("','", @{$self->{sysusers}}) . "')) AND table_owner NOT IN ('" . join("','", @{$self->{sysusers}}) . "') ";
ora2pg-21.0/lib/Ora2Pg.pm-12268- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-13156- my $table = $1;
ora2pg-21.0/lib/Ora2Pg.pm:13157: my $where = $2;
ora2pg-21.0/lib/Ora2Pg.pm-13158- $where =~ s/^\s+//;
ora2pg-21.0/lib/Ora2Pg.pm:13159: $where =~ s/\s+$//;
ora2pg-21.0/lib/Ora2Pg.pm-13160- $AConfig{$var}{$table} = $where;
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-16334- $tbmod =~ s/^([^\.]+\.)//; # Remove schema part from table name
ora2pg-21.0/lib/Ora2Pg.pm:16335: my $s = $self->{dbhdest}->prepare("SELECT count(*) FROM pg_indexes WHERE tablename = '\L$tbmod\E'$schema;") or $self->logit("FATAL: " . $self->{dbhdest}->errstr . "\n", 0, 1);
ora2pg-21.0/lib/Ora2Pg.pm-16336- $tbmod = $1 . $tbmod if ($1);
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-17082- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:17083: $sql .= " WHERE OWNER='$self->{schema}' ";
ora2pg-21.0/lib/Ora2Pg.pm-17084- } else {
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-17229-
ora2pg-21.0/lib/Ora2Pg.pm:17230: my $sql = "SELECT TABLE_NAME FROM $self->{prefix}_TABLES WHERE OWNER = '$schema' AND TABLE_NAME = '$table'";
ora2pg-21.0/lib/Ora2Pg.pm-17231- my $sth = $self->{dbh}->prepare( $sql ) or return undef;
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-17281- if ($self->{db_version} =~ /Release 8/) {
ora2pg-21.0/lib/Ora2Pg.pm:17282: $sql .= " ORDER BY A.BYTES DESC, A.SEGMENT_NAME ASC) WHERE ROWNUM <= $self->{top_max}";
ora2pg-21.0/lib/Ora2Pg.pm-17283- } else {
ora2pg-21.0/lib/Ora2Pg.pm:17284: $sql .= " ORDER BY S.BYTES DESC, S.SEGMENT_NAME ASC) WHERE ROWNUM <= $self->{top_max}";
ora2pg-21.0/lib/Ora2Pg.pm-17285- }
##############################################
ora2pg-21.0/lib/Ora2Pg.pm-19004- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg.pm:19005: $select_query = "SELECT * FROM $self->{schema}.$table WHERE ABS(MOD(" . $self->{defined_pk}{"\L$table\E"} . ",\${Internal.Step.Unique.Count}))=\${Internal.Step.Unique.Number}";
ora2pg-21.0/lib/Ora2Pg.pm-19006- } else {
ora2pg-21.0/lib/Ora2Pg.pm:19007: $select_query = "SELECT * FROM $table WHERE ABS(MOD(" . $self->{defined_pk}{"\L$table\E"} . ",\${Internal.Step.Unique.Count}))=\${Internal.Step.Unique.Number}";
ora2pg-21.0/lib/Ora2Pg.pm-19008- }
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-94-
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:95: my $sql = "SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' AND TABLE_SCHEMA = '$schema' AND TABLE_NAME = '$table'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-96-
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-170- my %tbspname = ();
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:171: my $sth = $self->{dbh}->prepare("SELECT DISTINCT TABLE_NAME, TABLESPACE_NAME FROM INFORMATION_SCHEMA.FILES WHERE table_schema = '$self->{schema}' AND TABLE_NAME IS NOT NULL") or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0);
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-172- $sth->execute or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-202- my %comments = ();
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:203: my $sql = "SELECT TABLE_NAME,TABLE_COMMENT,TABLE_TYPE,TABLE_ROWS,ROUND( ( data_length + index_length) / 1024 / 1024, 2 ) AS \"Total Size Mb\", AUTO_INCREMENT, ENGINE FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' AND TABLE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-204- $sql .= $self->limit_to_objects('TABLE', 'TABLE_NAME');
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-246- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:247: $sql .= " WHERE TABLE_SCHEMA='$self->{schema}' ";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-248- }
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-529- while (my $row = $sth->fetch) {
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:530: $row->[1] =~ s/`$self->{schema}`\.//g;
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-531- $row->[1] =~ s/`([^\s`,]+)`/$1/g;
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1375- # TABLE
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1376: my $sql = "SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' AND TABLE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1377- my $sth = $self->{dbh}->prepare( $sql ) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1383- # VIEW
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1384: $sql = "SELECT TABLE_NAME FROM INFORMATION_SCHEMA.VIEWS WHERE TABLE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1385- $sth = $self->{dbh}->prepare( $sql ) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1391- # TRIGGER
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1392: $sql = "SELECT TRIGGER_NAME FROM INFORMATION_SCHEMA.TRIGGERS WHERE TRIGGER_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1393- $sth = $self->{dbh}->prepare( $sql ) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1408- # FUNCTION
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1409: $sql = "SELECT ROUTINE_NAME FROM INFORMATION_SCHEMA.ROUTINES WHERE DATA_TYPE IS NOT NULL AND ROUTINE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1410- $sth = $self->{dbh}->prepare( $sql ) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1416- # PROCEDURE
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1417: $sql = "SELECT ROUTINE_NAME FROM INFORMATION_SCHEMA.ROUTINES WHERE DATA_TYPE IS NULL AND ROUTINE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1418- $sth = $self->{dbh}->prepare( $sql ) or $self->logit("FATAL: " . $self->{dbh}->errstr . "\n", 0, 1);
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1471- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1472: $str .= " WHERE TABLE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1473- }
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1495- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1496: $str .= " WHERE TABLE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1497- }
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1530-FROM INFORMATION_SCHEMA.TABLES
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1531:WHERE TABLE_SCHEMA='$self->{schema}'
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1532-GROUP BY TABLE_SCHEMA
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1559-FROM INFORMATION_SCHEMA.TABLES
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1560:WHERE TABLE_SCHEMA='$self->{schema}'
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1561-};
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1678- my @seqs = ();
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1679: my $sql = "SELECT TABLE_NAME, AUTO_INCREMENT FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' AND TABLE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1680- $sql .= $self->limit_to_objects('TABLE', 'TABLE_NAME');
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1866- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1867: $str .= " WHERE ROUTINE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1868- }
##############################################
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1918- if ($self->{schema}) {
ora2pg-21.0/lib/Ora2Pg/MySQL.pm:1919: $str .= " WHERE ROUTINE_SCHEMA = '$self->{schema}'";
ora2pg-21.0/lib/Ora2Pg/MySQL.pm-1920- }
##############################################
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm-1645- $str =~ s/SYS_CONTEXT\s*\(\s*'USERENV'\s*,\s*'(DB_NAME|DB_UNIQUE_NAME)'\s*\)/current_database/is;
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm:1646: $str =~ s/SYS_CONTEXT\s*\(\s*'USERENV'\s*,\s*'(HOST|IP_ADDRESS)'\s*\)/inet_client_addr()/is;
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm:1647: $str =~ s/SYS_CONTEXT\s*\(\s*'USERENV'\s*,\s*'SERVER_HOST'\s*\)/inet_server_addr()/is;
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm-1648-
##############################################
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm-2381- $str =~ s/\bELT\(\s*([^,]+)\s*,\s*([^\(\)]+)\s*\)/(ARRAY[$2])[$1]/igs;
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm:2382: $str =~ s/\bFIELD\(\s*([^,]+)\s*,\s*([^\(\)]+)\s*\)/(SELECT i FROM generate_subscripts(array[$2], 1) g(i) WHERE $1 = (array[$2])[i] UNION ALL SELECT 0 LIMIT 1)/igs;
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm:2383: $str =~ s/\bFIND_IN_SET\(\s*([^,]+)\s*,\s*([^\(\)]+)\s*\)/(SELECT i FROM generate_subscripts(string_to_array($2,','), 1) g(i) WHERE $1 = (string_to_array($2,','))[i] UNION ALL SELECT 0 LIMIT 1)/igs;
ora2pg-21.0/lib/Ora2Pg/PLSQL.pm-2384- $str =~ s/\bFROM_BASE64\(\s*([^\(\),]+)\s*\)/decode(($1)::bytea, 'base64')/igs;
##############################################
ora2pg-21.0/scripts/ora2pg-540-do
ora2pg-21.0/scripts/ora2pg:541: ltype=`echo \$etype | tr '[:upper:]' '[:lower:]'`
ora2pg-21.0/scripts/ora2pg:542: ltype=`echo \$ltype | sed 's/y\$/ie/'`
ora2pg-21.0/scripts/ora2pg-543- echo "Running: ora2pg -p -t \$etype -o \$ltype.sql -b \$namespace/schema/\$\{ltype\}s -c \$namespace/config/ora2pg.conf"
ora2pg-21.0/scripts/ora2pg-544- ora2pg -p -t \$etype -o \$ltype.sql -b \$namespace/schema/\$\{ltype\}s -c \$namespace/config/ora2pg.conf
ora2pg-21.0/scripts/ora2pg:545: ret=`grep "Nothing found" \$namespace/schema/\$\{ltype\}s/\$ltype.sql 2> /dev/null`
ora2pg-21.0/scripts/ora2pg-546- if [ ! -z "\$ret" ]; then
##############################################
ora2pg-21.0/scripts/ora2pg-552-do
ora2pg-21.0/scripts/ora2pg:553: ltype=`echo \$etype | tr '[:upper:]' '[:lower:]'`
ora2pg-21.0/scripts/ora2pg:554: ltype=`echo \$ltype | sed 's/y\$/ie/'`
ora2pg-21.0/scripts/ora2pg-555- echo "Running: ora2pg -t \$etype -o \$ltype.sql -b \$namespace/sources/\$\{ltype\}s -c \$namespace/config/ora2pg.conf"
ora2pg-21.0/scripts/ora2pg-556- ora2pg -t \$etype -o \$ltype.sql -b \$namespace/sources/\$\{ltype\}s -c \$namespace/config/ora2pg.conf
ora2pg-21.0/scripts/ora2pg:557: ret=`grep "Nothing found" \$namespace/sources/\$\{ltype\}s/\$ltype.sql 2> /dev/null`
ora2pg-21.0/scripts/ora2pg-558- if [ ! -z "\$ret" ]; then
##############################################
ora2pg-21.0/scripts/ora2pg-673-usage() {
ora2pg-21.0/scripts/ora2pg:674: echo "usage: `basename $0` [options]"
ora2pg-21.0/scripts/ora2pg-675- echo ""
##############################################
ora2pg-21.0/scripts/ora2pg-872- # Create owner user
ora2pg-21.0/scripts/ora2pg:873: user_exists=`psql -d $DB_NAME$DB_HOST$DB_PORT$DB_USER -Atc "select usename from pg_user where usename='$DB_OWNER';"`
ora2pg-21.0/scripts/ora2pg-874- if [ "a$user_exists" = "a" ]; then
##############################################
ora2pg-21.0/scripts/ora2pg-891- fi
ora2pg-21.0/scripts/ora2pg:892: db_exists=`psql -d $DB_NAME$DB_HOST$DB_PORT$DB_USER -Atc "select datname from pg_database where datname='$DB_NAME';"`
ora2pg-21.0/scripts/ora2pg-893- if [ "a$db_exists" = "a" ]; then
##############################################
ora2pg-21.0/scripts/ora2pg-927- do
ora2pg-21.0/scripts/ora2pg:928: lnspace=`echo $enspace | tr '[:upper:]' '[:lower:]'`
ora2pg-21.0/scripts/ora2pg-929- if confirm "Would you like to create schema $lnspace in database $DB_NAME?" ; then
##############################################
ora2pg-21.0/scripts/ora2pg-965-
ora2pg-21.0/scripts/ora2pg:966: ltype=`echo $etype | tr '[:upper:]' '[:lower:]'`
ora2pg-21.0/scripts/ora2pg:967: ltype=`echo $ltype | sed 's/y$/ie/'`
ora2pg-21.0/scripts/ora2pg-968- if [ -r "$NAMESPACE/schema/${ltype}s/$ltype.sql" ]; then
##############################################
ora2pg-21.0/scripts/ora2pg-1046- # remove command line option from the DSN string
ora2pg-21.0/scripts/ora2pg:1047: pgdsn_defined=`echo "$pgdsn_defined" | sed 's/ -. //g'`
ora2pg-21.0/scripts/ora2pg-1048-
##############################################
ora2pg-21.0/scripts/ora2pg_scanner-178- print "Running: $cmd_ora2pg -t SHOW_SCHEMA -s '$DB_DNS[$i]->{dsn}'\n";
ora2pg-21.0/scripts/ora2pg_scanner:179: print `$cmd_ora2pg -t SHOW_SCHEMA -s '$DB_DNS[$i]->{dsn}'`;
ora2pg-21.0/scripts/ora2pg_scanner-180- print "For each schema returned the following commands will be executed:\n";
##############################################
ora2pg-21.0/scripts/ora2pg_scanner-185- {
ora2pg-21.0/scripts/ora2pg_scanner:186: my @schema_list = `$cmd_ora2pg -t SHOW_SCHEMA -s '$DB_DNS[$i]->{dsn}'`;
ora2pg-21.0/scripts/ora2pg_scanner-187- foreach my $line (@schema_list)
##############################################
ora2pg-21.0/scripts/ora2pg_scanner-193- print "Running: $cmd_ora2pg -t SHOW_REPORT --dump_as_sheet --estimate_cost$header$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> $OUTDIR${SEP}dbs_scan.csv\n";
ora2pg-21.0/scripts/ora2pg_scanner:194: `$cmd_ora2pg -t SHOW_REPORT --dump_as_sheet --estimate_cost$header$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> $OUTDIR${SEP}dbs_scan.csv`;
ora2pg-21.0/scripts/ora2pg_scanner-195- $header = '';
##############################################
ora2pg-21.0/scripts/ora2pg_scanner-197- print "Running: $cmd_ora2pg -t SHOW_REPORT --dump_as_html --estimate_cost$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> \"$OUTDIR${SEP}$DB_DNS[$i]->{host}$DB_DNS[$i]->{sid}_$schemaname-report.html\"\n";
ora2pg-21.0/scripts/ora2pg_scanner:198: `$cmd_ora2pg -t SHOW_REPORT --dump_as_html --estimate_cost$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> "$OUTDIR${SEP}$DB_DNS[$i]->{host}$DB_DNS[$i]->{sid}_$schemaname-report.html"`;
ora2pg-21.0/scripts/ora2pg_scanner-199- }
##############################################
ora2pg-21.0/scripts/ora2pg_scanner-209- print "Running: $cmd_ora2pg -t SHOW_SCHEMA -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}'\n";
ora2pg-21.0/scripts/ora2pg_scanner:210: print `$cmd_ora2pg -t SHOW_SCHEMA -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}'`
ora2pg-21.0/scripts/ora2pg_scanner-211- }
##############################################
ora2pg-21.0/scripts/ora2pg_scanner-214- print "Running: $cmd_ora2pg -t SHOW_REPORT --dump_as_sheet --estimate_cost$header$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> $OUTDIR${SEP}dbs_scan.csv\n";
ora2pg-21.0/scripts/ora2pg_scanner:215: `$cmd_ora2pg -t SHOW_REPORT --dump_as_sheet --estimate_cost$header$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> $OUTDIR${SEP}dbs_scan.csv`;
ora2pg-21.0/scripts/ora2pg_scanner-216- print "Running: $cmd_ora2pg -t SHOW_REPORT --dump_as_html --estimate_cost$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> \"$OUTDIR${SEP}$DB_DNS[$i]->{sid}_$schemaname-report.html\"\n";
ora2pg-21.0/scripts/ora2pg_scanner:217: `$cmd_ora2pg -t SHOW_REPORT --dump_as_html --estimate_cost$audit -s '$DB_DNS[$i]->{dsn}' -n '$DB_DNS[$i]->{schema}' >> "$OUTDIR${SEP}$DB_DNS[$i]->{sid}_$schemaname-report.html"`;
ora2pg-21.0/scripts/ora2pg_scanner-218- }
##############################################
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff-22-- if (!$ENV{RPM_BUILD_ROOT}) {
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff:23:- `perl -p -i -e 's#my \\\$CONFIG_FILE .*#my \\\$CONFIG_FILE = "$CONFDIR/ora2pg.conf";#' scripts/ora2pg`;
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff-24-- } else {
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff-25-- # Do not include prefix with rpmbuild
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff:26:- `perl -p -i -e 's#my \\\$CONFIG_FILE .*#my \\\$CONFIG_FILE = "$RPM_CONFDIR/ora2pg.conf";#' scripts/ora2pg`;
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff-27-- }
##############################################
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff-29-- my $tmp_conf = quotemeta($CONFDIR);
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff:30:- `perl -p -e "s#my \\\$CONFIG_FILE .*#my \\\$CONFIG_FILE = '$tmp_conf\\\\ora2pg.conf';#" scripts\\ora2pg > scripts\\ora2pg.tmp`;
ora2pg-21.0/debian/patches/02_remove_unnecessary_files.diff-31-- `copy scripts\\ora2pg.tmp scripts\\ora2pg /Y`;
##############################################
ora2pg-21.0/.pc/01_Ora2Pg.pod.diff/doc/Ora2Pg.pod-2646-
ora2pg-21.0/.pc/01_Ora2Pg.pod.diff/doc/Ora2Pg.pod:2647: <sql>SELECT * FROM HR.EMPLOYEES WHERE ABS(MOD(employee_id,${Internal.Step.Unique.Count}))=${Internal.Step.Unique.Number}</sql>
ora2pg-21.0/.pc/01_Ora2Pg.pod.diff/doc/Ora2Pg.pod-2648-
##############################################
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL-1312- if (!$ENV{RPM_BUILD_ROOT}) {
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL:1313: `perl -p -i -e 's#my \\\$CONFIG_FILE .*#my \\\$CONFIG_FILE = "$CONFDIR/ora2pg.conf";#' scripts/ora2pg`;
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL-1314- } else {
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL-1315- # Do not include prefix with rpmbuild
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL:1316: `perl -p -i -e 's#my \\\$CONFIG_FILE .*#my \\\$CONFIG_FILE = "$RPM_CONFDIR/ora2pg.conf";#' scripts/ora2pg`;
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL-1317- }
##############################################
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL-1319- my $tmp_conf = quotemeta($CONFDIR);
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL:1320: `perl -p -e "s#my \\\$CONFIG_FILE .*#my \\\$CONFIG_FILE = '$tmp_conf\\\\ora2pg.conf';#" scripts\\ora2pg > scripts\\ora2pg.tmp`;
ora2pg-21.0/.pc/02_remove_unnecessary_files.diff/Makefile.PL-1321- `copy scripts\\ora2pg.tmp scripts\\ora2pg /Y`;