$ perl flp.pl d, liam, niapple