@priority = qw(RB1 RB2 FL1 FL2 QB1 QB2 TE1 WR1 WR2 DST);
$continue = 'Y';
while($continue == 'Y')
{
@mypri = grep(!/ $position /, @priority);
print "Random position iterations in order of priority: \n";
foreach (@mypri)
{
print "$_\n";
}
print "Do you wish to lock another player position? Enter 'Y' to add another player or press Enter to continue";
$continue = <>;
}