mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 17:50:22 +00:00
forgot to add the test fixture
This commit is contained in:
43
samples/Text/ISO-2022-KR.txt
Normal file
43
samples/Text/ISO-2022-KR.txt
Normal file
@@ -0,0 +1,43 @@
|
||||
$)C#
|
||||
# Out-AnsiGraph.psm1
|
||||
# Author: xcud
|
||||
# History:
|
||||
# v0.1 September 21, 2009 initial version
|
||||
#
|
||||
# PS Example> ps | select -first 5 | sort -property VM |
|
||||
# Out-AnsiGraph ProcessName, VM
|
||||
# AEADISRV 14508032
|
||||
# audiodg 50757632
|
||||
# conhost 73740288
|
||||
# AppleMobileDeviceService 92061696
|
||||
# btdna 126443520
|
||||
#
|
||||
function Out-AnsiGraph($Parameter1=$null) {
|
||||
BEGIN {
|
||||
$q = new-object Collections.queue
|
||||
$max = 0; $namewidth = 0;
|
||||
}
|
||||
|
||||
PROCESS {
|
||||
if($_) {
|
||||
$name = $_.($Parameter1[0]);
|
||||
$val = $_.($Parameter1[1])
|
||||
if($max -lt $val) { $max = $val}
|
||||
if($namewidth -lt $name.length) {
|
||||
$namewidth = $name.length }
|
||||
$q.enqueue(@($name, $val))
|
||||
}
|
||||
}
|
||||
|
||||
END {
|
||||
$q | %{
|
||||
$graph = ""; 0..($_[1]/$max*20) |
|
||||
%{ $graph += "" }
|
||||
$name = "{0,$namewidth}" -f $_[0]
|
||||
"$name $graph " + $_[1]
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
Export-ModuleMember Out-AnsiGraph
|
||||
Reference in New Issue
Block a user