my @video=qw(format director producer acter);
my @audio=qw(album song);
my @picture=qw(photographer style size);

my $form1=CGI::FormBuilder->new(
                                fields=> \@all,
                                method=>'POST'
                                 );