[CmdletBinding(DefaultParameterSetName = 'Host')] param ( # ScriptBlock that will be traced. [Parameter( ValueFromPipeline = $true, Mandatory = $true, HelpMessage = 'Expression to be traced' )] [ScriptBlock]$Expression, # Name of the Trace Source(s) to be traced. [Parameter( Mandatory = $true, HelpMessage = 'Name of trace, see Get-TraceSource for valid values' )] [ValidateScript({ Get-TraceSource -Name $_ -ErrorAction Stop })] [string[]]$Name, # Option to leave only trace information # without actual expression results. [switch]$Quiet, # Path to file. If specified - trace will be sent to file instead of host. [Parameter(ParameterSetName = 'File')] [ValidateScript({ Test-Path $_ -IsValid })] [string]$FilePath ) begin { if ($FilePath) { # assume we want to overwrite trace file $PSBoundParameters.Force = $true } else { $PSBoundParameters.PSHost = $true } if ($Quiet) { $Out = Get-Command Out-Null $PSBoundParameters.Remove('Quiet') | Out-Null } else { $Out = Get-Command Out-Default } } process { Trace-Command @PSBoundParameters | & $Out } } PS> New-Alias -Name tre -Value Trace-Expression PS> Export-ModuleMember -Function * -Alias *
Cobol
If x is less than y then
Do the first action
Else
Do the second action
End-if.
Evaluate X
When 1 perform action1
When 2 perform action2
When 3 perform action3
When others perform action4
End-evaluateIDENTIFICATION DIVISION.
PROGRAM-ID. HELLO-WORLD.
PROCEDURE DIVISION.
DISPLAY 'Hello, world.'
STOP RUN.
* Ilkka Remes - Jäätyvä helvetti
Venäläinen tiedustelukone törmää Suomenlahden yllä Finnairin matkustajakoneeseen. Samana iltana selittämättömät sabotaasi- ja kyberiskut katkaisevat sähköt ja viestiyhteydet koko maasta. Suomalaiset jäävät uutispimentoon paukkupakkasessa. Paniikki kasvaa, pako kuolemanloukoiksi jäähtyvistä asunnoista kiihtyy. Moskova kiistää osallisuuden onnettomuuteen ja syyttää länttä sodanlietsonnasta.