eniocarboni

<?xml version="1.0" encoding="UTF-8"?>
<issues xmlns="http://pkp.sfu.ca" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://pkp.sfu.ca native.xsd">
        <issue xmlns="http://pkp.sfu.ca" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" published="1" current="0" xsi:schemaLocation="http://pkp.sfu.ca native.xsd">
                <issue_identification>
                        <volume><![CDATA[21]]></volume>
                        <year><![CDATA[1964]]></year>
                </issue_identification>
                <date_published>1969-01-01</date_published>
                <last_modified>1969-01-01</last_modified>
                <sections>

eniocarboni

<?xml version="1.0"?>
<xsl:stylesheet 
	version="1.1" 
	xmlns:xsl="http://www.w3.org/1999/XSL/Transform" 
	xmlns:a="http://www.fatturapa.gov.it/sdi/fatturapa/v1.1">
	<xsl:output method="html" />

	<xsl:template name="FormatDate">
		<xsl:param name="DateTime" />

eniocarboni

hacluster_pwd="$1"
hafence_pwd="$2"

HOSTNAME=$(hostname)
HOSTID=$(echo $HOSTNAME | sed 's/.*-//')
eths=$(ip address | grep '^[0-9]' | awk '{print $2}' | uniq | grep -v lo | sed 's/://g' | sed 's/@.*$//')
eth1=$(echo $eths | awk '{print $1}')
eth2=$(echo $eths | awk '{print $2}')
eth3=$(echo $eths | awk '{print $3}')

eniocarboni

# Input params:
hacluster_pwd="$1"
hafence_pwd="$2"

HOSTNAME=$(hostname)
HOSTID=$(echo $HOSTNAME | sed 's/.*-//')
eths=$(ip address | grep '^[0-9]' | awk '{print $2}' | uniq | grep -v lo | sed 's/://g' | sed 's/@.*$//')
eth1=$(echo $eths | awk '{print $1}')
eth2=$(echo $eths | awk '{print $2}')
eth3=$(echo $eths | awk '{print $3}')

eniocarboni

# Show message box popup.
Add-Type -AssemblyName System.Windows.Forms
$result = [System.Windows.Forms.MessageBox]::Show("My message", "Window Title", [System.Windows.Forms.MessageBoxButtons]::OK, [System.Windows.Forms.MessageBoxIcon]::None)

# Show input box popup.
Add-Type -AssemblyName Microsoft.VisualBasic
$inputText = [Microsoft.VisualBasic.Interaction]::InputBox("Enter some value:", "Window Title", "Default value")
 
# Show an Open File Dialog and return the file selected by the user.
function Read-OpenFileDialog([string]$InitialDirectory, [switch]$AllowMultiSelect)

eniocarboni

#! /usr/bin/perl
  
use Net::SMTP;
use utf8;

# === Start of variables to modify ===
$from='<YOUR_FROM@YOUR_FROM_DOMAIN>';
$to  ='<YOUR_RECIPIENT@YOUR_RECIPIENT_DOMAIN>';
$subject='test message with Net::SMTP';
$data='Test msg row 1

eniocarboni

#! /usr/bin/perl
  
use Net::SMTP;

$smtp=Net::SMTP->new(Host=>'localhost', Debug=>1);
die "Unable to connect\n" unless $smtp;
print $smtp->banner();
$smtp->quit;

eniocarboni

#! /usr/bin/perl
use LWP;
use Crypt::SSLeay;
use utf8;

binmode(STDOUT,'utf8');
$user_name="<YOUR_USER>";
$user_pw="<YOUR_PASSW>";
$url="https://mds.test.datacite.org/";
$doi="10.5072/TEST/T2/89";