Hello friends, I have loaded Strawberry perl on my machine.

I wanted to run a basic program

#!perl
    use Inline CPP => <<'END';     use warnings;
     int doodle() { } 
 class Foo {
    public:      
    Foo(); 
      ~Foo();             
        int get_data() { return data; }
          void set_data(int a) { data = a; } 
 private:
     int data; 
  };  
 Foo::Foo() { cout << "creating a Foo()" << endl; } 
 Foo::~Foo() { cout << "deleting a Foo()" << endl; }   
END
[download]

The Error faced:

Can't find string terminator "END" anywhere before EOF at inline.pl line 2.

I have also seen in many articles that Inline CPP does not work with VS 2008 (vc 9) is this correct ?.