- use Getopt::Long
- File::Temp if no -t option?
