<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
        {font-family:"Cambria Math";
        panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
        {font-family:Calibri;
        panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
        {font-family:Tahoma;
        panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
        {font-family:Verdana;
        panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Calibri",sans-serif;
        mso-fareast-language:EN-US;}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:#0563C1;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:#954F72;
        text-decoration:underline;}
pre
        {mso-style-priority:99;
        mso-style-link:"HTML Preformatted Char";
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:10.0pt;
        font-family:"Courier New";}
span.HTMLPreformattedChar
        {mso-style-name:"HTML Preformatted Char";
        mso-style-priority:99;
        mso-style-link:"HTML Preformatted";
        font-family:"Courier New";}
span.EmailStyle19
        {mso-style-type:personal;
        font-family:"Calibri",sans-serif;
        color:windowtext;}
span.EmailStyle20
        {mso-style-type:personal;
        font-family:"Verdana",sans-serif;
        color:#1F497D;}
span.searchword0
        {mso-style-name:searchword0;}
span.EmailStyle22
        {mso-style-type:personal-reply;
        font-family:"Calibri",sans-serif;
        color:#1F497D;}
.MsoChpDefault
        {mso-style-type:export-only;
        font-size:10.0pt;}
@page WordSection1
        {size:612.0pt 792.0pt;
        margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
        {page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang="EN-GB" link="#0563C1" vlink="#954F72">
<div class="WordSection1">
<p class="MsoNormal"><span style="color:#1F497D">Thanks Matt, but it’s the latter I’m after – sending the user automatically to a new location with parameters based upon the values submitted in a form.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="color:#1F497D">Alan<o:p></o:p></span></p>
<p class="MsoNormal"><span style="color:#1F497D"><o:p> </o:p></span></p>
<div>
<div style="border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b><span lang="EN-US" style="mso-fareast-language:EN-GB">From:</span></b><span lang="EN-US" style="mso-fareast-language:EN-GB"> eprints-tech-bounces@ecs.soton.ac.uk [mailto:eprints-tech-bounces@ecs.soton.ac.uk]
<b>On Behalf Of </b>Matthew Brady<br>
<b>Sent:</b> 10 May 2016 23:49<br>
<b>To:</b> eprints-tech@ecs.soton.ac.uk<br>
<b>Subject:</b> Re: [EP-tech] redirecting to external URLs<o:p></o:p></span></p>
</div>
</div>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">Hi Alan,<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">Do you want the user to click on a link ? Or force the page to redirect to the new location automatically??<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">If it’s the former, you could do it in a similar way that the DOI’s get processed…<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">e.g. in the eprint_fields.pl<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU">{<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> name => 'id_number',<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> type => 'text',<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> render_value => 'EPrints::Extras::render_possible_doi',<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU">},<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">Then in perl_lib/EPrints/extras.pm<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU">sub render_possible_doi<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU">{<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> my( $session, $field, $value ) = @_;
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> $value = "" unless defined $value;<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> if( $value !~ /^(doi:)?10\.\d\d\d\d\// ) { return $session->make_text( $value ); }<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU">
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> $value =~ s/^doi://;<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> my $url = "<a href="http://dx.doi.org/$value">http://dx.doi.org/$value</a>";<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> my $link = $session->render_link( $url );<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> $link->appendChild( $session->make_text( $value ) );<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU"> return $link;
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Courier New";mso-fareast-language:EN-AU">}<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">This will take the value entered into the id_number field, and render it as a link on the screen, prefixing it with the appropriate http url leader
etc…<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">Cheers<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D">Matt<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-AU" style="font-size:10.0pt;font-family:"Verdana",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<div>
<div style="border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma",sans-serif;mso-fareast-language:EN-AU">From:</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma",sans-serif;mso-fareast-language:EN-AU">
<a href="mailto:eprints-tech-bounces@ecs.soton.ac.uk">eprints-tech-bounces@ecs.soton.ac.uk</a> [<a href="mailto:eprints-tech-bounces@ecs.soton.ac.uk">mailto:eprints-tech-bounces@ecs.soton.ac.uk</a>]
<b>On Behalf Of </b>Alan.Stiles<br>
<b>Sent:</b> Tuesday, 10 May 2016 11:57 PM<br>
<b>To:</b> <a href="mailto:eprints-tech@ecs.soton.ac.uk">eprints-tech@ecs.soton.ac.uk</a><br>
<b>Subject:</b> [EP-tech] redirecting to external URLs<o:p></o:p></span></p>
</div>
</div>
<p class="MsoNormal"><span lang="EN-AU"><o:p> </o:p></span></p>
<p class="MsoNormal">So anyone know how I should be redirecting the user to an alternative URL based on some processing in a Screen action?<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">As it is, I’m setting the url in the action by <o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">$self->{processor}->{redirect_to_url} = “<a href="http://example.org">http://example.org</a>”;<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">and then checking for it in <o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">sub redirect_to_me_url {<o:p></o:p></p>
<p class="MsoNormal"> …<o:p></o:p></p>
<p class="MsoNormal"> return $self->{processor}->{redirect_to_url};<o:p></o:p></p>
<p class="MsoNormal">} <o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">It seems a little too hacky!<o:p></o:p></p>
<p class="MsoNormal">Cheers,<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><span style="color:#44546A;mso-fareast-language:EN-GB">Alan Stiles<o:p></o:p></span></p>
<p class="MsoNormal"><span style="color:#44546A;mso-fareast-language:EN-GB">Digital Repository Developer<o:p></o:p></span></p>
<p class="MsoNormal"><span style="color:#44546A;mso-fareast-language:EN-GB">Library Services, The Open University<o:p></o:p></span></p>
<p class="MsoNormal"><span style="color:#44546A;mso-fareast-language:EN-GB"><a href="http://oro.open.ac.uk/">oro.open.ac.uk</a><o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Times New Roman",serif;mso-fareast-language:EN-AU">-- The Open University is incorporated by Royal Charter (RC 000391), an exempt charity in England & Wales and a charity registered in Scotland
(SC 038302). The Open University is authorised and regulated by the Financial Conduct Authority.
<o:p></o:p></span></p>
<pre><span lang="EN-AU"><o:p> </o:p></span></pre>
<pre><span lang="EN-AU">_____________________________________________________________<o:p></o:p></span></pre>
<pre><span lang="EN-AU">This email (including any attached files) is confidential and is for the intended recipient(s) only. If you received this email by mistake, please, as a courtesy, tell the sender, then delete this email.<o:p></o:p></span></pre>
<pre><span lang="EN-AU"><o:p> </o:p></span></pre>
<pre><span lang="EN-AU">The views and opinions are the originator's and do not necessarily reflect those of the University of Southern Queensland. Although all reasonable precautions were taken to ensure that this email contained no viruses at the time it was sent we accept no liability for any losses arising from its receipt.<o:p></o:p></span></pre>
<pre><span lang="EN-AU"><o:p> </o:p></span></pre>
<pre><span lang="EN-AU">The University of Southern Queensland is a registered provider of education with the Australian Government.<o:p></o:p></span></pre>
<pre><span lang="EN-AU">(CRICOS Institution Code QLD 00244B / NSW 02225M, TEQSA PRV12081 )<o:p></o:p></span></pre>
</div>
</body>
</html>