请教:如何在标量字串中提取一行文本

请教:如何在标量字串中提取一行文本

请教:如何在标量字串中提取一行文本
现在将一记录存在一标量变量中,想从中提取一行文本
$line=~ s/^LOCUS\s*//;
$locus=$line;
每次都将整条记录提取出来.
解决了。