At ikke-flytte en fil - 2

• $UPLOAD{'AdNum'} =~ tr/0-9//cd;

• $UPLOAD{'Password'} =~ tr/a-zA-Z0-9!+&#%$@*//cd;

• $AdNum = $UPLOAD{'AdNum'};

• Og $AdNum kan kun indeholde tal

• Dvs. ingen ../../../ tricks