Új hozzászólás Aktív témák
-
esteban
senior tag
PARCI!!!!!!!!!!!!!!! vagy valaki, nem hiszem el, hogy senki nem tud semmit!!

-
esteban
senior tag
magjegyzem, a PROHARDVER -en is ezzel jelennek meg a .prog hirek:
http://www.prog.hu/backend/proghu.rdf
-
esteban
senior tag
nezd ezt meg ... valami olyasmi, csak hogy kell konfiguralni, feltelepiteni ?
--------------------------------------------------------------------------------------------
#!/usr/bin/perl -w
# rss2html - converts an RSS file to HTML
# It take one argument, either a file on the local system,
# or an HTTP URL like http://slashdot.org/slashdot.rdf
# by Jonathan Eisenzopf. v1.0 19990901
# Copyright (c) 1999 Jupitermedia Corp. All Rights Reserved.
# See http://www.webreference.com/perl for more information
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
# INCLUDES
use strict;
use XML::RSS;
use LWP::Simple;
# Declare variables
my $content;
my $file;
# MAIN
# check for command-line argument
die ''Usage: rss2html.pl (<RSS file> | <URL>)\n'' unless @ARGV == 1;
# get the command-line argument
my $arg = shift;
# create new instance of XML::RSS
my $rss = new XML::RSS;
# argument is a URL
if ($arg=~ /http:/i) {
$content = get($arg);
die ''Could not retrieve $arg'' unless $content;
# parse the RSS content
$rss->parse($content);
# argument is a file
} else {
$file = $arg;
die ''File \''$file\'' does't exist.\n'' unless -e $file;
# parse the RSS file
$rss->parsefile($file);
}
# print the HTML channel
&print_html($rss);
# SUBROUTINES
sub print_html {
my $rss = shift;
print <<HTML;
<table bgcolor=''#000000'' border=''0'' width=''200''><tr><td>
<TABLE CELLSPACING=''1'' CELLPADDING=''4'' BGCOLOR=''#FFFFFF'' BORDER=0 width=''100%''>
<tr>
<td valign=''middle'' align=''center'' bgcolor=''#EEEEEE''><font color=''#000000'' face=''Arial,Helvetica''><B><a href=''$rss->{'channel'}->{'link'}''>$rss->{'channel'}->{'title'}</a></B></font></td></tr>
<tr><td>
HTML
# print channel image
if ($rss->{'image'}->{'link'}) {
print <<HTML;
<center>
<p><a href=''$rss->{'image'}->{'link'}''><img src=''$rss->{'image'}->{'url'}'' alt=''$rss->{'image'}->{'title'}'' border=''0''
HTML
print '' width=\''$rss->{'image'}->{'width'}\''''
if $rss->{'image'}->{'width'};
print '' height=\''$rss->{'image'}->{'height'}\''''
if $rss->{'image'}->{'height'};
print ''></a></center><p>\n'';
}
# print the channel items
foreach my $item (@{$rss->{'items'}}) {
next unless defined($item->{'title'}) && defined($item->{'link'});
print ''<li><a href=\''$item->{'link'}\''>$item->{'title'}</a><BR>\n'';
}
# if there's a textinput element
if ($rss->{'textinput'}->{'title'}) {
print <<HTML;
<form method=''get'' action=''$rss->{'textinput'}->{'link'}''>
$rss->{'textinput'}->{'description'}<BR>
<input type=''text'' name=''$rss->{'textinput'}->{'name'}''><BR>
<input type=''submit'' value=''$rss->{'textinput'}->{'title'}''>
</form>
HTML
}
# if there's a copyright element
if ($rss->{'channel'}->{'copyright'}) {
print <<HTML;
<p><sub>$rss->{'channel'}->{'copyright'}</sub></p>
HTML
}
print <<HTML;
</td>
</TR>
</TABLE>
</td></tr></table>
HTML
}
--------------------------------------------------------------------------------------------
http://www.webreference.com/perl/tutorial/8/index.html -
esteban
senior tag
ez egy hatalmas halozat, majd keresek linket. Rengetegen teszik igy kozze hireiket, amiket konnyen(?) megjelenithetsz a lapodon. Mint pl. a prg.hu hirek a PROHARDVER nyitolapjan ,,,,
teljesen legalis, raadasul baratom lapja, o adta meg, csak os em tudja hogyna tudom megcsinalni, a postNuke-nak van letoltheto modulja ... allitolag. -
esteban
senior tag
olyant mar talaltam ami html kodbol csinal rss-t .. az van , de ami visszaalakitja, az mind kemenyen szerveroldali alakalmazas, ugy nezem, amihez admin jog kell barmilyen szerveren ...
-
esteban
senior tag
www.azsia.net/backend.php
ird be a bongeszobe + enter
-
esteban
senior tag
rss formatumban erkezo hireket, hogyan tudom megjeleniteni a weboldalon?
Új hozzászólás Aktív témák
- mefistofeles: Az elhízás nem akaratgyengeség!
- Milyen monitort vegyek?
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- CPU léghűtés kibeszélő
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Google Pixel topik
- Nintendo Switch 2
- ASUS routerek
- Terraria
- PlayStation 5
- További aktív témák...
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- PC Game Pass előfizetés
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- AKCIÓ! Microsoft XBOX Series X 1TB SSD fekete játékkonzol garanciával hibátlan működéssel
- 137 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4080 - 4 ÉV GARANCIA!
- GYÖNYÖRŰ iPhone XR 128GB White-1 ÉV GARANCIA - Kártyafüggetlen, MS4294
- Lenovo T14S Thinkpad FHD IPS i5-1135G7 16GB RAM 256GB SSD Intel Iris XE Graphics Win11 Pro Garancia
- ASUS Vivobook Go E1504GA-NJ284TW Notebook
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest




