Perl переход к строке в файле

my $desired_line = 12;
open (STREAM2, 'off.xml') || die "Can't open STREAM2\n";
flock(STREAM2,LONG_NB);
##########################перейти к строке номер $count
while ($curr = <STREAM2>)
{
    next if $. <= $desired_line;
    ...
};

 <STREAM2> for(1..$count);  

readline for 1..$count;

readline while $. < $count;

tie @array, 'Tie::File', 'off.xml';
while ()# <=== вот здесь
{
  $curr = $array[$lin];
  open (LIN, '>line.txt');
  print (LIN, ++$lin);
  close LIN;
  ...
  ...
  ...
};

#!/usr/bin/perl

use Modern::Perl 2010;

sub readFileNums {
        my ($fileName, $begin, $end) = @_;
        die if ($begin > $end); ## можно реверз сделать
        my $cur = 1; ## см 1
        open (IN, $fileName) || die;

        while ($cur < $begin) { # см 1
                <IN>;
                ++$cur;
        }

        sub {
                if (!wantarray) {
                        return if $cur == ($end + 1); # [1] тут реши сам строки с 0 или с 1
                        ++$cur;
                        <IN>;
                } else {
                        my @text;
                        while (defined (my $str = <IN>) and ($cur++ <= $end)) { ## как и тут
                                push @text => $str;
                        }
                        @text;
                }
        }
}


my $it = readFileNums "test.txt", 3, 10;
#while (my $t = $it->()) {
#       print $t
#}

print $it->();

for($count..$#array){
	next if $array[$_] == undef;
	#code
}

<?xml version="1.0" encoding="windows-1251"?>
<!DOCTYPE yml_catalog SYSTEM "shops.dtd">
<yml_catalog date="2010-10-05 23:21">
  <shop>
    <name>OZON.ru</name>
    <company>ООО "Интернет Решения"</company>
    <url>http://www.ozon.ru/</url>
    <currencies>
      <currency id="RUR" rate="1" />
    </currencies>
    <categories>
      <category id="8108">Художественная литература</category>
      <category id="12351" parentId="8108">Русская литература</category>
      <category id="1113586" parentId="12351">Юбилей А.П. Чехова! К 150-летию со дня рождения</category>
      <category id="1000362" parentId="12351">Современная русская литература (с 1991 года)</category>
      <category id="1071049" parentId="1000362">Женская проза</category>
      <category id="1087320" parentId="1071049">Борминская, Светлана</category>
      <category id="1087321" parentId="1071049">Ким, Лилия</category>
      <category id="1092308" parentId="1071049">Лазорева, Ольга</category>
      <category id="1072180" parentId="1071049">Латынина, Юлия</category>
      <category id="1071241" parentId="1071049">Петрушевская, Людмила</category>
      <category id="1099220" parentId="1071049">Робски, Оксана</category>
      <category id="1071239" parentId="1071049">Рубина, Дина</category>
      <category id="1099221" parentId="1071049">Славникова, Ольга</category>
      <category id="1118376" parentId="1071049">Соломатина, Татьяна</category>
...
...
...
</categories>

<offers>
      <offer id="76276" type="artist.title" available="false">
        <url>http://www.ozon.ru/context/detail/id/76276/?from=partner</url>
        <price>323</price>
        <currencyId>RUR</currencyId>
        <categoryId>1093871</categoryId>
        <categoryId>1098207</categoryId>
        <picture>http://www.ozon.ru/multimedia/audio_cd_covers/cdm254_11_10.jpg</picture>
        <delivery>true</delivery>
        <orderingTime>
          <ordering>В течение недели</ordering>
        </orderingTime>
        <artist>Иосиф Бродский</artist>
        <title>Иосиф Бродский. Ранние стихотворения</title>
        <year>1996</year>
        <media>Audio CD</media>
        <description>Ночной полет; Дни бегут надо мной…; Как тюремный засов…</description>
      </offer>
      <offer id="83061" type="book" available="false">
        <url>http://www.ozon.ru/context/detail/id/83061/?from=partner</url>
        <price>109</price>
        <currencyId>RUR</currencyId>
        <categoryId>1072967</categoryId>
        <picture>http://www.ozon.ru/multimedia/books_covers/fo223_06_07.jpg</picture>
        <delivery>true</delivery>
        <orderingTime>
          <ordering>В течение недели</ordering>
        </orderingTime>
        <author>В. С. Левадный</author>
        <name>Ремонт квартиры в современных условиях</name>
        <publisher>Аделант</publisher>
        <series>Своими руками</series>
        <year>2007</year>
        <ISBN>5-89691-024-X</ISBN>
        <binding>84x108/32</binding>
        <page_extent>384</page_extent>
        <table_of_contents>Ремонт квартиры в современных условиях</table_of_contents>
        <description>Книга посвящена особенностям ремонта квартиры с применением современных инструментов и материалов, задействованию новых технологий при осуществлении перепланировки внутриквартирного пространства, отделке и восстановлению покрытий и стен, потолков, пола, ремонту лестниц, электро- и сантехнического оборудования, оборудованию вентиляции.</description>
      </offer>
...
...
...
    </offers>
  </shop>
</yml_catalog>