#!/usr/bin/perl -w
use strict;

package Fyp::Security;

sub log {
    my $arg = shift;
    print $arg;
};

package main;

my $experiment_name = 'foo';
my $dirname = "/experiments/$experiment_name";

Fyp::Security::log( "Creating dir $dirname\n" );