Something like:

$ARGV [0] eq "add" ? do {push @predefined => $ARGV [1]} :
$ARGV [0] eq "del" ? do {@predefined = grep {$_ ne $ARGV [1]} @predefi
+ned} :
die "Unknown command"
[download]

perhaps?

Abigail