#!/usr/bin/perl

system("echo","emerge", @ARGV);
system("emerge", @ARGV);

while($?) {
    system("echo", "emerge", "--resume", "--skipfirst", @ARGV);
    system("emerge", "--resume", "--skipfirst", @ARGV);
}