file for each position in genome

[m_elena_bioinfo]

Good morning SEQanswer community,
I have to create a file containing one position of the genome for lane, like this:

chrX 1 2
chrX 2 3
....
chrX 155270560 155270561

I would prefer to use bioperl package. But I can't find a module (for example Bio:B::Sam, Bio::SeqIO) for this type of problem.

Any ideas?
Thanks a lot!
ME