#!/usr/bin/perl

if(-d "/home/username") {
    print "A felhasználói könyvtár létezik\n";
}