#!/usr/bin/perl5.8.8

use strict;
use warnings;

my $infile = $ARGV[0];
chomp $infile;
open (my $INFILE,"<", $infile)
close ($INFILE); 

##</code><code>##

 #PBS -t 1-10
#PBS -l walltime=48:00:00
/usr/bin/perl /chongle/jeri/timecheck/MUSCLEHMM.pl $PBS_ARRAYID > /chongle/jeri/timecheck/output.$PBS_ARRAYID.txt 2> /chongle/jeri/timecheck/error.$PBS_ARRAYID.txt

##</code><code>##

#Use of uninitialized value in concatenation (.) or string at line 18.
#Use of uninitialized value in scalar chomp at /chongle/jeri/timecheck/MUSCLEHMM.pl line 19.
#Use of uninitialized value in open at /chongle#/jeri/timecheck/MUSCLEHMM.pl line 20.
#No such file or directory at /chongle/jeri/timecheck/MUSCLEHMM.pl line 20.