Netik Interview Question

inheritance in perl