sub Splacker {
my $error = shift;
print STDERR $error;
}