#!/bin/perl
$str = "test";
print "$str\n";