#!/usr/bin/perl if ( $God->isa( "DJ" ) ) { $God = "Tersefia"; }