i had been doing this. but the $eng_dat and $hindi_dat never get printed. how do i solve this issue.
#!/bin/env perl open(HANDLE,"<labels");@lines=<HANDLE>;close HANDLE; for($i=0;$i<=$#lines;$i++) { ($english_index,$hindi_index,$nua)=split(/\|/,$lines[$i]); @english=split(/:/,$english_index); @hindi=split(/:/,$hindi_index); print @english,"\n",@hindi,"\n"; for($j=0;$j<=$#english;$j++) { $eng_dat=`grep --regexp '$english[$j]' /home/vikash/pro_1/ +en_1000`; print $eng_dat; } for($j=0;$j<=$#hindi;$j++) { $hindi_dat=`grep --regexp '$hindi[$j]' /home/vikash/pro +_1/HI_1000`; print $hindi_dat; } print "*********************************************************** +******\n"; }
In reply to Re^4: system call with variable interpolation
by vikashiiitdm
in thread system call with variable interpolation
by angshuman
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |