#!/usr/bin/perl
use strict;
use warnings;

my $OS = $^O;
require "${OS}.pm";
linux->foo;