]>
Commit | Line | Data |
---|---|---|
bac8c385 DM |
1 | #!/usr/bin/perl |
2 | ||
3 | use lib '.'; | |
4 | use strict; | |
5 | use warnings; | |
6 | use PVE::RESTHandler; | |
7 | use PVE::LXC::Config; | |
8 | ||
9 | my $prop = PVE::LXC::Config->json_config_properties(); | |
10 | ||
11 | my $phash = $prop->{net0}; | |
12 | ||
13 | my $format = $phash->{format}; | |
14 | ||
15 | my $typetext = PVE::PodParser::schema_get_type_text($phash); | |
16 | ||
17 | print "`net[n]`: `$typetext`\n\n"; | |
18 | ||
19 | print PVE::RESTHandler::dump_properties($format); |