glue Gtk+2.0 to Perl using Inline

[Jens Luedicke]

Hi ...

The following code compiles, but doesn't work:

<include>
#!/usr/bin/perl

use Inline C => 'DATA',
        LIBS => `pkg-config gtk+-2.0 --libs`,
        INC => `pkg-config gtk+-2.0 --cflags`;

gtk_init(scalar(@ARGV),@ARGV);

$window = gtk_window_new(0);

gtk_widget_show($window);

gtk_main();

__DATA__
__C__

#include <gtk/gtk.h>

extern void gtk_init(int *argc, char ***argv);
extern void gtk_main(void);
extern void gtk_widget_show(GtkWidget *widget);
extern GtkWidget* gtk_window_new(GtkWindowType type);
</include>

What do I need to get it to run?

I would like to bind Gtk+ 2.0 to Perl
using Inline, if its possible.

-- 
Jens Luedicke
[EMAIL PROTECTED]