つPerl

if($.==ある行){
　好きな操作;
}