설명해주신대로 처음부터 해서 asc파일을 생성하였읍니다..
그런다음 split.pl을 하라고 해서...설명해주신소스대로
라고 했더니 다음과 같은 에러가 떴읍니다..
도와주세요...부탁드립니다...
#!/usr/bin/perl
$infile = $ARGV[0] ;
$outdir= $ARGV[1] ;
$options = $ARGV[2] ;
open( infileH, $infile ) || die "Cannot open $fileName.";
 if ( !$options ) { &printsql() ; }
 sub printsql()
{
while ( $aLine = ) {
if ( $aLine =~ /^d*.[FDESANPLTI]/ ) {
 @arrtext = split( /./,$aLine ) ;
 if ( $aLine =~ /^d*.Text/ ) {
 $prevno = $arrtext[0];
} elsif ( $aLine =~ /^d*.[FDESANPLI]/ ) {
 $prevno = 0 ;
}
 open ( outfileH, ">>$outdir/$arrtext[0]") || die "Cannot open $arrtext[0].";
printf outfileH "$aLine" ;
}
close (outfileH ) ;
}
close( infileH );
}
  ///에러내용///
 ./split.pl nic.asc nic_mysql
: command not found
./split.pl: =: command not found
: command not found
./split.pl: =: command not found
: command not found
./split.pl: =: command not found
: command not found
./split.pl: syntax error near unexpected token `infileH,'
'/split.pl: ./split.pl: line 6: `open( infileH, $infile ) || die "Cannot open $;