Question

I am getting the an error while reading a file and below is the script.

#!/bin/bash
$file = "SampleLogFile.txt";    #--- line 2 
open(MYINPUTFILE,$file);        #--- line 3  
while(<**MYINPUTFILE**>) { 

# Good practice to store $_ value because
# subsequent operations may change it.
my($line) = $_;

# Good practice to always strip the trailing
# newline from the line.
chomp($line);

# Convert the line to upper case.
print "$line" if $line = ~ /sent/;

}
close (MYINPUTFILE);

Output :

PerlTesting_New.ksh[2]: =: not found
PerlTesting_New.ksh[3]: syntax error at line 3 : `(‘ unexpected

Any idea what the issue is ?

Answer 1

Change

#!/bin/bash

to

#!/usr/bin/perl

Otherwise Perl will not be interpreting your script. Change path accordingly as per your system