Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

06.06.2010, 17:15
|
|
Moderator - Level 7
Регистрация: 12.07.2008
Сообщений: 1,705
Провел на форуме: 5914048
Репутация:
1350
|
|
Как удалить с помощью скрипта файлы в корзине:
(New-Object -ComObject Shell.Application).NameSpace(0x0a).Items() | Remove-Item -Path {$_.path}
Константы ShellSpecialFolderConstants - http://msdn.microsoft.com/en-us/library/bb774096(v=VS.85).aspx
В данном случае:
ssfBITBUCKET = 0x0a
|
|
|

12.06.2010, 02:59
|
|
Moderator - Level 7
Регистрация: 12.07.2008
Сообщений: 1,705
Провел на форуме: 5914048
Репутация:
1350
|
|
В ирк Slip задал вопрос: - Как будет выглядеть преобразование символов в противоположный регистр? Его реализация этой задачи оказалась короче на Perl.Perl выиграл
Perl:
perl -e "for(shift =~ /\w/g) { print lc if /\p{IsUpper}/; print uc if /\p{IsLower}/; }" KjbgfYGKHJKHghk
Powershell:
function CaseConvert
{
process {-join ([char[]]$_ | ForEach-Object { if ([char]::islower($_)) {[char]::toUpper($_)} else {[char]::tolower($_)}})}
}
"ПриВет","DeErrQ" | CaseConvert"
Вывод:
пРИвЕТ
dEeRRq
${C:\windows\win.ini} | CaseConvert
Вывод:
; FOR 16-BIT APP SUPPORT
[FONTS]
[EXTENSIONS]
[MCI EXTENSIONS]
[FILES]
[mAIL]
mapi=1
cmcdllname32=MAPI32.DLL
cmc=1
mapix=1
mapixver=1.0.0.1
olemESSAGING=1
[mci eXTENSIONS.bak]
M2V=mpegvIDEO
MOD=mpegvIDEO
А вот ,что удобнее использовать решать уже вам =)
Последний раз редактировалось SpangeBoB; 12.06.2010 в 03:03..
|
|
|

12.06.2010, 03:34
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
Провел на форуме: 21768337
Репутация:
3486
|
|
Кстати на Перле вышло в итоге ещё короче:
Код:
perl -e "$_ = shift, tr/A-Za-z/a-zA-Z/, print;" QwErTy
Но таки хочется уменьшить ещё:)
|
|
|

12.06.2010, 11:02
|
|
Members of Antichat
Регистрация: 03.09.2005
Сообщений: 594
Провел на форуме: 3606217
Репутация:
685
|
|
2 Slip
powershell отлично работает с .NET. Портировав перловый регэксп - выйдет короче)
|
|
|

12.06.2010, 11:08
|
|
Moderator - Level 7
Регистрация: 12.07.2008
Сообщений: 1,705
Провел на форуме: 5914048
Репутация:
1350
|
|
Сообщение от .Slip
Кстати на Перле вышло в итоге ещё короче:
Код:
perl -e "$_ = shift, tr/A-Za-z/a-zA-Z/, print;" QwErTy
Но таки хочется уменьшить ещё 
А на сколько уменьшится если на вход подается 3 языка,например:Украинский, усский,Английский?
|
|
|

17.06.2010, 01:06
|
|
Moderator - Level 7
Регистрация: 12.07.2008
Сообщений: 1,705
Провел на форуме: 5914048
Репутация:
1350
|
|
Небольшая заметка,по поводу как получить свой внешний IP,в данном случае воспользуемся сервисом http://www.myip.ru.Регексп,который используется не совсем корректен если парсить ip,но так как ресурс проверяет валидность сам,то этого достаточно.
PHP код:
function Get-ExternalIp
{
$webcl = New-Object System.Net.WebClient
try {
$webcl.DownloadString('http://www.myip.ru/get_ip.php?loc=') -match "\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\b" | Out-Null
"Ваш IP-адрес: {0}" -f $matches[0]
}
catch
{
"IP-адрес не удалось получить."
}
}
Ваш IP_адрес: 127.0.0.1
Маленькое дополнение с GUI.Для этого мы воспользуемся PowershellPack,который содержит свыше 1000 всевозможно полезных функций и скриптов.Скачать PowerShellPack и более подробно ознакомиться с его функционалом можно http://code.msdn.microsoft.com/PowerShellPack
Import-Module WPK
New-Label (get-externalip) | show-window
Uploaded with ImageShack.us
Последний раз редактировалось SpangeBoB; 17.06.2010 в 01:30..
|
|
|
|
 |
|
TEST QR: []
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|