#!/usr/bin/perl
#---------------------------------------------------------------
# Project         : Mandrake Linux
# Module          : testzilla/clients
# File            : add_system
# Version         : $Id: add_system,v 1.3 2004/01/15 11:54:12 flepied Exp $
# Author          : Frederic Lepied
# Created On      : Mon Dec 29 19:36:09 2003
# Purpose         : upload a video card record to the hardware
#                 database
#---------------------------------------------------------------

use lib qw(/usr/share/testzilla);
use testzilla;

my $hwdb = testzilla::init("add_system");

testzilla::upload_system($hwdb);

# add_system ends here
