Guest User

Untitled

a guest
Jan 10th, 2014
119
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.     if ($data =~ /^([-\@\w.]+)$/) {
  2.     $data = $1;             # $data now untainted
  3.     } else {
  4.     die "Bad data in '$data'";  # log this somewhere
  5.     }
RAW Paste Data