document.write('\
\ "); document.write('
  1. Function Add-SessionVariable()
    2. \
  2. {
    3. \
  3.         param ([string[]]$VariableName=$null)
    4. \
  4.        
    5. \
  5.         [string[]]$VariableNames = [AppDomain]::CurrentDomain.GetData(\'Variable\')
    6. \
  6.         $VariableNames += $VariableName
    7. \
  7.        
    8. \
  8.         if ($input)
    9. \
  9.         {
    10. \
  10.                 $VariableNames += $input
    11. \
  11.         }
    12. \
  12.        
    13. \
  13.         #To Not Waste Space, Remove Duplicates
    14. \
  14.         $VariableNames = $VariableNames | Select-Object -Unique
    15. \
  15.        
    16. \
  16.         [AppDomain]::CurrentDomain.SetData(\'Variable\',$VariableNames)
    17. \
  17. }
    18. \
  18.  
    19. \
  19. Function Set-SessionVariableList()
    20. \
  20. {
    21. \
  21.         $VariableNames = Get-Variable -scope global| ForEach-Object {$_.Name}
    22. \
  22.         Add-SessionVariable $VariableNames
    23. \
  23.        
    24. \
  24.         Write-Verbose \'Loaded Variable Names into AppDomain\'
    25. \
  25.         $counter = 1
    26. \
  26.         Foreach ($Variable in $VariableNames)
    27. \
  27.         {
    28. \
  28.                 Write-Verbose "`t $($counter): $Variable"
    29. \
  29.                 $counter++
    30. \
  30.         }
    31. \
  31. }
    32. \
  32.  
    33. \
  33. Function Get-SessionVariableList()
    34. \
  34. {
    35. \
  35.         [AppDomain]::CurrentDomain.GetData(\'Variable\')
    36. \
  36. }
    37. \
  37.  
    38. \
  38. Function Remove-NewVariable()
    39. \
  39. {
    40. \
  40.         $StartingMemory = (Get-Process -ID $PID).WS / 1MB
    41. \
  41.         Write-Verbose "Current Memory Usage: $StartingMemory MB"
    42. \
  42.  
    43. \
  43.         $VariableNames = Get-SessionVariableList
    44. \
  44.         $VariableNames += \'StartingMemory\'
    45. \
  45.         Get-Variable -scope global | Where-Object {$VariableNames -notcontains $_.name} | Remove-Variable -scope global
    46. \
  46.        
    47. \
  47.         [GC]::Collect()
    48. \
  48.        
    49. \
  49.         $EndingMemory = (Get-Process -ID $PID).WS / 1MB
    50. \
  50.         Write-Verbose "Ending Memory: $EndingMemory MB"
    51. \
  51.        
    52. \
  52.         $Diff = $StartingMemory - $EndingMemory
    53. \
  53.         Write-Verbose "Freed up: $Diff MB"
    54. \
  54. }
    55. \
');document.write('
downloadThis Script brought to you by PoshCode\
\
\
');