| Public Scratchpad | Download, Select Code To D/L |
# Regex for an ip address my ($ip) = $q->remote_addr() =~ /^((\d{2,3}\.){3}\d{2,3})$/;
Remove all decorations (ie, title-bar and WM buttons) from a Tk window
| Public Scratchpad | Download, Select Code To D/L |
# Regex for an ip address my ($ip) = $q->remote_addr() =~ /^((\d{2,3}\.){3}\d{2,3})$/;