01.
$Qdata
=
"test.txt"
;
02.
$assay
= file(
$Qdata
) ;
03.
$L
=
array
();
04.
05.
$w
=0;
06.
07.
while
(list (
$line_num
,
$line
) = each (
$assay
))
08.
{
09.
10.
$search
=
substr
(
$line
,0,10) ;
11.
if
(
$search
==
"ABCDEFGHIJ"
){
12.
$L
[
$w
] =
$line_num
;
13.
echo
" $line_num <br>"
;
14.