擅长:python、mysql、java
<p>只需先按制表符拆分行,然后拆分第二列并使用循环。你知道吗</p>
<p>代码</p>
<pre><code>my $filename ="abc.txt"; # provide your text filename
open FH, $filename or die "Error\n";
while(<FH>)
{
chomp($_);
my @arr = split(/\t/,$_);
my @val =split(/;\s/,$arr[1]); # check the delimiter here if you have any problem
foreach my $id (@val)
{
print "$arr[0]\t$id\t$arr[2]\n";
}
}
</code></pre>
<p>希望这对你有用。你知道吗</p>