JFIFxxC      C  " }!1AQa"q2#BR$3br %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz w!1AQaq"2B #3Rbr#!/usr/bin/perl # Update ports snapshot require './software-lib.pl'; &foreign_require("proc"); &ui_print_unbuffered_header(undef, $text{'ports_upgrade'}, ""); foreach my $cmd ("portsnap fetch", "portsnap update || portsnap extract") { print &text('ports_running', "$cmd"),"
\n"; print "
";
	($fh, $pid) = &proc::pty_process_exec($cmd);
	while(<$fh>) {
		print &html_escape($_);
		}
	close($fh);
	print "
"; last if ($?); } &ui_print_footer("?tab=update", $text{'index_return'});