+ my $totalsize = &Pakfire::addsizes(@all);
+ $totalsize = &Pakfire::beautifysize($totalsize);
+ &Pakfire::message("\n### Download size: \t ~ $totalsize");
+
+ if ($interactive) {
+ &Pakfire::message("Is this okay? [y/N]");
+ my $ret = <STDIN>;
+ chomp($ret);
+ &Pakfire::logger("Answer: $ret");
+ if ( $ret ne "y" ) {
+ &Pakfire::message("Installation aborted.");
+ exit 1;
+ }
+ }
+
+ &Pakfire::message("### Installing all packages:");
+
+ foreach (@all) {
+ &Pakfire::setuppak("$_");
+ }
+
+
+ } elsif ("$ARGV[0]" eq "remove") {
+
+
+ } elsif ("$ARGV[0]" eq "update") {
+ &Pakfire::getmirrors();
+ &Pakfire::dbgetlist();
+ }