@$accounts = grep { !/44443/ } @$accounts;
# ^
# |
# Here.