newLISP is a scripting language for developing web applications and programs in general and in the domains of artificial intelligence (AI) and statistics.
Here's a sample code for a port scanner:
#!/usr/bin/newlisp
(set 'params (main-args))
(if (< (length params) 5)
(begin
(println "USAGE: port.lsp host begin-port end-port")
(exit)
)
)
(set 'host (nth 2 params))
(set 'bport (int (nth 3 params)))
(set 'eport (int (nth 4 params)))
(for (port bport eport)
(begin
(set 'socket (net-connect host port))
(if socket (println port " open"))
)
)
(exit)
I was able to build newLISP and run it without installing it.
LINK
Comments:
All comments are filtered before moderator review.
Only common ASCII characters allowed.
Comments are truncated to 2000 characters.
Names are also kept short by truncation.
|