#!/usr/bin/perl use C; C->foo();