isWirelessInterface :: String -> IO (Bool)
isWirelessInterface iface =  doesDirectoryExist (sysfsnet </> iface </> "wireless")
isWirelessInterface :: String -> IO (Bool)
isWirelessInterface iface =  doesDirectoryExist (sysfsnet </> iface </> "wireless")
isWirelessInterface iface =  doesDirectoryExist (sysfsnet </> iface </> "wireless")