added perl note