sub isValidIP {
    #234567890123456789012345
    use Socket;inet_aton(pop)
}