#!/usr/local/bin/perl print(eval("ls"));