use strict;
open (LST, "c:\\tester.txt")||die "$^E : $!\n";
chomp (my @data=<LST>);
for (@data)
{
	print "$1\n" if ($_ =~ /(.+)\[\*+REQUIRES USER CONTEXT\*+\]\s*$/);
}
close (LST)