##</code><code>##

use strict;
use warnings FATAL => qw(all);
use PPM::Repositories;
for ( keys %Repositories )
{
	print `ppm repository add $_ $Repositories{$_}->{location}`;
}

##</code><code>##

Unrecognized ppm command 'repository'; try one of area, config, describe,
  files, gui, help, info, install, list, log, profile, query, remove, repo,
  search, tree, uninstall, update, upgrade, verify, or version
Usage:  ppm <cmd> <arg>...
        Run 'ppm help' to learn more.