perl 如何提取大小条件的值

Question

1 现有两个文本 a.txt, b.txt
2 文件内容如下：
a.txt
ID1 1883092 1883268

ID1 1883207 1883295

ID1 1883655 1883702
ID1 1886233 1886361
ID2 4555 6777
......

b.txt
ID1 1880213 1881441 1881616 1884058 1884122 1884209 1884310 1884429 1884584 1885374 1885472 1885809 1885938 1886022
ID2 223 334 400 500
.....
要求：
比如： 输出 a.txt文件数据在b.txt的 1880213 1881441间，1881616，1884058间的符合数据

得到结果文件：
ID1 1883092 1883268

ID1 1883207 1883295

ID1 1883655 1883702

Answer 1

a=oepn('a.txt','r').read
b=oepn('b.txt','r').read
for i in a:
for x in b: