test/generateconfig.pl

   1 use strict;
   2 use warnings;
   3 use File::Copy;
   4 use PVE::Cluster qw(cfs_read_file);
   5
   6 use PVE::Network::SDN;
   7
   8
   9 my $network_config = PVE::Network::SDN::generate_etc_network_config();
  10 PVE::Network::SDN::write_etc_network_config($network_config);
  11 print $network_config;
  12
  13
  14 my $frr_config = PVE::Network::SDN::generate_frr_config();
  15 print $frr_config;