Advertisement
Guest User

Untitled

a guest
May 21st, 2017
155
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.26 KB | None | 0 0
  1. % perl6 -e 'my $l = IO::Socket::INET.new(:listen, :localhost<localhost>, :localport(0)); qx{netstat -lnp 2>/dev/null| grep moar}.say; $l.localport.say'
  2. tcp6 0 0 ::1:39205 :::* LISTEN 22396/moar
  3.  
  4. 39205
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement