Powershell ScriptBlock serialization/deserialization

scriptblock.ps1

Function Serialize-Command
{
    param(
        [scriptblock]$Scriptblock
    )
    $rxp = '\$using:(?<var>\w+)'
    $ssb = $Scriptblock.ToString()
    $cb = {
        $v = (Get-Variable -Name $args[0].Groups['var'] -ValueOnly)
        $ser = [System.Management.Automation.PSSerializer]::Serialize($v)
        "`$([System.Management.Automation.PSSerializer]::Deserialize('{0}'))" -f $ser
    }
    $sb = [RegEx]::Replace($ssb, $rxp, $cb, [System.Text.RegularExpressions.RegexOptions]::IgnoreCase)
    $Serialized = [System.Management.Automation.PSSerializer]::Serialize($sb)
    [System.Text.Encoding]::UTF8.GetBytes($Serialized)
}

Function Deserialize-Command
{
    param(
        [byte[]]$ScriptblockString
    )
    $Serialized = [System.Text.Encoding]::UTF8.GetString($ScriptblockString)
    $sb = [System.Management.Automation.PSSerializer]::Deserialize($Serialized.ToString())
    [Scriptblock]::Create($sb).GetNewClosure()
}

$a = "is this what you wanted?"
$b = Serialize-Command { "test $using:a" }
$a = "okay"
$c = Deserialize-Command $b
$a = "right"