gilaxone

Perl References

Simple Perl variables are called scalars. Examples of scalar values are

   $number      = 123;
   $string      = "String";
   $file_handle = open "<filename";
   $null_value  = undef;
 $instance = MyClass-&gt;new;

	#!/usr/bin/perl

	use DBI;
	use Email::MIME;
	use Log::Log4perl qw(get_logger :levels);
	use Data::Dumper;

	use strict;

	# For backgrounding

	<?php

	/**
	* Make a DNS a request to a custom nameserver, this is similar to dns_get_record, but allows you to query any nameserver
	* Usage: dns_get_record_from('ns.server.tld', 'A', 'mydomain.tld');
	* => ['42.42.42.42']
	* @author bohwaz
	*/
	function dns_get_record_from(string $server, string $type, string $record, string $protocol = 'udp'): array
	{

	#!/usr/bin/perl

	use DBI;
	use Email::MIME;
	use Log::Log4perl qw(get_logger :levels);
	use Data::Dumper;

	use strict;

	# For backgrounding