#!/usr/bin/perl -w

@list = qw (al23u alimo923 appic appkids art9342 babysit3874je2 bayr34 bbq3783 bd823we bgr232 birbrun birlu234s br823s3 brdeat brdg3354 bre9384 brknck bru23232 bru23234 bru243465 bru9233 bru9943 brunchwalk3994 byenate camp2134 capfl2 caphi5690 cas2389 coney324f dbrun2898rj4u2s did1234 dor3233 dor8342 dum452 eri28934 erin923 est2394 fj0116 FunDay govisle gpb8123i gphol1e883jn12 gut342 hal29323 hamp2834 hanhamp32012i hannahhamp9ej23mf hli8234a ja93ie jor23423 jos23234 kar983 kits2332 kr92323 lcfire32 ld9234 leb39ijs2 lil923we liz23445 liz2934 lns8382 lnsb324 london3829hjq1nbf10vbezz mai9483 mands3434 mar3823 max9393 mbd832 mcarpic765 mem2332 mer92oh23e michcol mj934 mop242d mpa239 nb928234e nel9824 northgreenpoint83jdfwfyy2c northside9aa72bf3hhzcudDss3 nye23230 pbj393hjs3 peteatlit phi2383h phi23rsq phi3834 pian93jinq1nie32dfex pic1174 piz2323 piz294i53 piz392923 pizwe923 pong3245 pong334 ppl786 pr342 pr456 pr9383 prb934 prbidis prdvd prdvd342r raku0907 rsh983je sc8282 sha23er she2373 sher38ie83s sle5i34 sn239 sp293 strainer sue988d taj test7779 timsparty tobe823hh23 toegg93ke-jsje tra23328 tramdj238k5672jcgd tt7865 verm292 vero878 vjam334 wat3234 wc883 wed1 win883a);

for (@list) {
  print "$_\n";
  `mv $_ _del/`;
}