$ 
$ cat -n statements.sql
     1    Insert into table_name (col1,col2,col3,col4,col5,DATE1,DATE2,col6,col7,col8,col9,col10,col11) values (6752,14932156,24,'ALL','Staff',to_date('04/17/2017 00:00:00','MM/DD/YYYY HH24:MI:SS'),to_date('05/24/2017 23:59:59','MM/DD/YYYY HH24:MI:SS'),'aso 4','device',148,null,null,null);
     2    Insert into emp (empno,ename,job,sal,hiredate,mgr,deptno) values (21,'Adrian','Salesman',1000,to_date('01/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS'),1,42);
     3    Insert into tname (col1,col2,col3,col4) values (to_date('01/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS'),to_date('02/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS'),to_date('03/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS'),to_date('04/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS'));
     4    Insert into temp (col1,col2,col3,col4) values (null,null,null,null);
$ 
$ 
$ cat -n generate_qry.pl 
     1    #!/usr/bin/perl -w
     2    use strict;
     3    # Accept the file name as first argument and open it
     4    my $file = $ARGV[0];
     5    
     6    open(FH, "<", $file) or die "Can't open $file: $!";
     7    while (<FH>) {
     8        # Parse the line and set the table name, column-list and value-list
     9        my ($tab, $cols, $vals) = m/into\s+(\S+)\s+\((.*)\)\s+values\s+\((.*)\)/i;
    10    
    11        # Split the column-list and value-list into arrays. The "to_date" token will
    12        # be split into two elements and will be joined during loop iteration.
    13        my @c = split(/,/,$cols);
    14        my @v = split(/,/,$vals);
    15        my $qry = sprintf("select * from %s", $tab);
    16        my ($left, $right, $j);
    17    
    18        foreach my $i (0..$#c) {
    19            # Each predicate is of the form "left-string right-string". Here,
    20            # "left-string" is "where column" and "right-string" is "= value".
    21            if ($i eq 0) {
    22                $left = sprintf("where %s", $c[$i]);
    23                $j = $i;
    24            } else {
    25                $left = sprintf("and %s", $c[$i]);
    26            }
    27            $right = $v[$j];
    28    
    29            # Check the right-string and adjust it according to its value. If
    30            # it has "to_date" function, then increment the right counter and append
    31            # the next element.
    32            if ($right =~ m/null/i) {
    33                $right = sprintf(" is %s", $right);
    34            } elsif ($right =~ m/to_date/i) {
    35                $j++;
    36                $right = sprintf(" = %s,%s", $right, $v[$j]);
    37            } else {
    38                $right = sprintf(" = %s", $right);
    39            }
    40            $j++;
    41            $qry .= sprintf("\n%s%s", $left, $right);
    42        }
    43    
    44        # We're done. Print the query and move on to the next line from file.
    45        $qry .= ";\n";
    46        printf("\n%s", $qry);
    47    }
    48    close(FH) or die "Can't close $file: $!";
    49    
$ 
$ perl generate_qry.pl statements.sql

select * from table_name
where col1 = 6752
and col2 = 14932156
and col3 = 24
and col4 = 'ALL'
and col5 = 'Staff'
and DATE1 = to_date('04/17/2017 00:00:00','MM/DD/YYYY HH24:MI:SS')
and DATE2 = to_date('05/24/2017 23:59:59','MM/DD/YYYY HH24:MI:SS')
and col6 = 'aso 4'
and col7 = 'device'
and col8 = 148
and col9 is null
and col10 is null
and col11 is null;

select * from emp
where empno = 21
and ename = 'Adrian'
and job = 'Salesman'
and sal = 1000
and hiredate = to_date('01/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS')
and mgr = 1
and deptno = 42;

select * from tname
where col1 = to_date('01/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS')
and col2 = to_date('02/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS')
and col3 = to_date('03/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS')
and col4 = to_date('04/01/2017 00:00:00','MM/DD/YYYY HH24:MI:SS');

select * from temp
where col1 is null
and col2 is null
and col3 is null
and col4 is null;
$ 
$